nicht ohne VBA, also wie VBA?
28.01.2021 18:33:40
Yal
Am IT vorbei:
man kann zwar keine VBA-Code ausführen, das mit einer Datei geliefert wurde, aber das selbst geschriebene Code sollte funktionieren. Spricht, die Sub/Function programmieren und als .bas-Textdatei exportieren. Dann kann jedesmal diese bas-Datei in einer neuen Datei importiert werden (idealerweise nicht die Datei,die Du druckst und anschliessend schliesst).
Ansonsten,
man könnte den Visualbasic-Skript in einem VBS-Datei speichern.
Man müsste nur die Exceldateiname als Parameter übergeben.
VB-Skript ist beinah gleich wie VBA, es gibt keine Library-Anbindung, so dass alle Objekte per "CreateObject" instanziert werden müssen.
Es könnte ungefähr so aussehen:
dim args, xlApp, xlBook, xlSh, sShName
Set args = WScript.Arguments
If args.Count > 0 Then
Set xlApp = CreateObject("Excel.Application")
For i = 0 To args.Count - 1
set xlBook = xlApp.Workbooks.open(Args.item(i), 0, true)
For each sShName in Array(1,2,3,4,5,7,8,9,10,11,13,14)
xlbook.worksheets(cstr(sShName)).PrintOut
Next
'wscript.echo "Printed"
xlBook.Close
Next
End If
xlApp.Quit
set xlApp = Nothing
set xlBook = Nothing
wscript.echo "Finished"
Drucker müsste vielleicht spezifiziert werden.
Ungetest. Wie immer auf eigene Gefahr.
Dieses Code in einem "Excel_Drucken.vbs" speichern. Gerufen wird entweder in Cmd-/Powershell-Fenster, oder in dem -glaube ich mindestens- man einem Excel per Drag&Drop auf diesem VBS fallen lässt. habe selber nicht geprüft.
Viel Erfolg
Yal