Gibt es eine Möglichkeit, alle eingeblendeten Tabellenblätter anzuwählen und zu drucken (ohne ausgeblendete Sheets)?
Ich bin wirklich verzweifelt und wäre euch sehr dankbar wenn ihr mir helfen könntet!!!
Gruß
Vogi
Sub SichtbareAusdrucken()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
If ws.Visible = xlSheetVisible Then
ws.PrintOut
End If
Next ws
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen