Von |
cicco |
eMail |
|
Am |
01. April 2008 um 11:01:44 |
Frage |
Hallo zusammen,
ich habe ein kurioses Problem beim Drucken aus VBA, insbesondere weil dieses Problem nicht immer auftritt.
Ich drucke ein Tabellenblatt 4 mal hintereinander aus, jedesmal mit einem anderen Wert in einer bestimmten Zelle. Lasse ich den Code in Einzelschritten durchlaufen wird jedes der 4 Blätter korrekt gedruckt, wenn ich den Code komplett durchlaufen lasse habe ich beim ersten Druck ein weißes Blatt, die nächsten 3 Blätter werden korrekt gedruckt. Hat eventuell jemand einen Ansatz woran dass liegen könnte ? Anbei der Code:Application.ScreenUpdating = False ActiveSheet.PageSetup.Zoom = 93 Sheets("Druckblatt").PrintOut From:=1, To:=1, Copies:=1 Range("A74") = "Exemplar für Empfänger / Copy For consignee" Sheets("Druckblatt").PrintOut From:=1, To:=1, Copies:=1 Range("A74") = "Exemplar für Frachtführer / Copy For carrier" Sheets("Druckblatt").PrintOut From:=1, To:=1, Copies:=1 Range("A74") = "Exemplar für Absender / Copy For sender" Sheets("Druckblatt").PrintOut From:=1, To:=1, Copies:=1 Application.ScreenUpdating = True Bin für jeden Hinweis dankbar, ich brüte schon seit Stunden und komme einfach nicht weiter.
Vielen Dank schon mal
Gruß cicco |
|