Makrosstart bevor gedruckt wird (beforePrint)
27.11.2003 06:15:34
Chris b
zu einem Problem von gestern.Da habe ch zwar ein ANtwort bekommen aber sie funktioniert nicht deshalb hoffe ich mit einem neuen Thread auf eine Antwort die bei mir funktioniert !?
Ich möchte gerne ein Makro starten bevor ich drucke.. eigenltich nachdem ich gedruckt habe "
Private Sub Workbook_AFTERPrint(Cancel As Boolean) " das ist aber leider nicht möglich.Jetzt die frage ist es möglich das ich erst ein makro ausführe und danach Drucke ?Hier das bsp von gestern funktioniert aber leider nicht :(
Danke für eure Hilfe Christian
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Application.EnableEvents = False
ActiveWindow.SelectedSheets.PrintOut
Cells(1, 1) = "test"
Cancel = True
Application.EnableEvents = True
End Sub
Anzeige