Hallo aus der Schweiz!
Ich habe eine For/Next Schleife zum Ausdrucken von einzelnen, verschiedenen Workbooks.
Die Workbooks werden tadellos aufgerufen, aber der Drucker (in diesem Falle der PDF-Writer) bleibt nach dem ersten Druckauftrag "hängen".
Gibt es da einen "End-Befehl"?
Ich habe die Stelle, an der ich denke, dass der Befehl hin müsste, unten gekennzeichnet.
P.S.: Heute ist etwa mein dritter VBA-Tag... Auch wenn die Lösung dämlich einfach wäre - kann mir jemand helfen?
Danke und Gruss
Tom
For l = 1 To 6

' Makro Ausdrucken der Files in .pdf Format
' Makro am 07.01.04 von H101023 aufgezeichnet
'
'
Workbooks.Open FileName:="D:\Daten\Data Migration\Controlling\Excel Testordner\Printtestordner\PrintTestMaster" & l & ".xls"


Application.ActivePrinter = "\\VSOE02PS\FinePrint pdfFactory auf Ne09:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"\\VSOE02PS\FinePrint pdfFactory auf Ne09:"

ApplicationActivePrinter.Close ----> oder ähnlich.....???

ActiveWorkbook.Close



Next l