ist es möglich ausgeblendete Blätter zu drucken?
und wenn, wie?
Danke schonmal.
Sub ABdrucken()
Application.ScreenUpdating = False
Sheets("Tabelle2").Visible = True
' Vorschau
Sheets("Tabelle2").PrintOut Preview:=True
' Ausdrucken
' Sheets("Tabelle2").PrintOut
Sheets("Tabelle2").Visible = False
Application.ScreenUpdating = True
End Sub