woran kann es liegen dass das Nachfolgende Makro so lange braucht, d.h. es dauert sehr lange bis die Daten zum Drucker gesendet werden. Ich habe das gleiche Makro in einen anderen Blatt getestet und da funktioniert es seltsamerweise ganz norma ( d.h. ich gehe auf die Schaltfläche wo das Makro hinterlegt ist) und die Daten werden unmittelbar zum Drucker gesendet und gedrukt.
Woran könnte das liegen ?
Private Sub CommandButton4_Click() ' Abteilung 4 Drucken
Application.ScreenUpdating = False
UserForm1.Hide
Rows("11:87").EntireRow.Hidden = True
Range("A8:AG113").PrintOut Copies:=1, Collate:=False
Rows("11:87").EntireRow.Hidden = False
Application.ScreenUpdating = True
End Sub
Gruß Werner