Wie kann man ausgeblendete Arbeitsblätter in Excel schnell drucken?

Wenn Sie eine Arbeitsmappe mit zahlreichen Arbeitsblättern haben, von denen einige sichtbar und andere ausgeblendet sind, und Sie nur die ausgeblendeten drucken möchten, folgen Sie diesen Schritten. Da Excel standardmäßig das Drucken von ausgeblendeten Blättern nicht erlaubt, zeige ich Ihnen, wie Sie dies mit einem einfachen VBA-Code erreichen können:

1. Drücken Sie die Tasten "Alt" + "F11", um das Fenster "Microsoft Visual Basic for Applications" zu öffnen.

2. Klicken Sie im Fenster "Microsoft Visual Basic for Applications" auf "Einfügen" > "Modul". Kopieren Sie dann den folgenden VBA-Code in das Codefenster.

VBA-Code: Ausgeblendete Arbeitsblätter in Excel drucken

Sub PrintHiddenSheets()
'Updated by Extendoffice 2024/07/15
Dim wSheet As Worksheet
Dim CurStat As Variant
For Each wSheet In ActiveWorkbook.Worksheets
If Not wSheet.Visible Then
CurStat = wSheet.Visible
wSheet.Visible = xlSheetVisible
wSheet.PrintOut
wSheet.Visible = CurStat
End If
Next
End Sub

2. Und klicken Sie dann auf die Schaltfläche oder die F5-Taste, um den Code auszuführen. Dies wird alle ausgeblendeten Arbeitsblätter in Ihrer Arbeitsmappe drucken.