bitte um eure Hilfe bei der entsprechenden Anpassung des Codes.
Mit nachfolgendem Makro drucke ich die ausgeblendete Tabelle2 aus:
Sub Tabelle2_drucken()
Application.ScreenUpdating = False
Sheets("Tabelle2").Visible = True
Sheets("Tabelle2").PrintOut
Sheets("Tabelle2").Visible = False
Application.ScreenUpdating = True
End Sub
Ich würde aber gerne vor dem Ausdruck die Druckvorschau aufrufen und dann entweder ausdrucken oder eben auch nicht ausdrucken. Jedenfalls sollte anschließend die Tabelle2 immer auch wieder ausgeblendet werden.Vielen Dank im Voraus.
mfg
Fritz