Wie kann man schnell die Anzahl der versteckten Arbeitsblätter in Excel zählen?

Wenn Sie eine große Arbeitsmappe mit Hunderten von Arbeitsblättern haben und einige Arbeitsblätter ausgeblendet sind. Um einige spezielle Anforderungen zu erfüllen, möchten Sie die Anzahl der versteckten Arbeitsblätter in der Arbeitsmappe kennen. Wie können Sie dies tun, anstatt sie einzeln zu zählen? Jetzt werde ich zwei Tricks vorstellen, mit denen die versteckten Arbeitsblätter schnell auf einmal gezählt werden können.

Zählen Sie versteckte Blätter mit VBA

Zählen Sie versteckte / sichtbare Blätter mit Kutools for Excel

Löschen Sie versteckte Blätter oder blenden Sie alle versteckten Blätter mit Kutools for Excel aus

---

Zählen Sie versteckte Blätter mit VBA

Ich stelle einen VBA-Code vor, mit dem ein Dialogfeld angezeigt werden kann, in dem die Anzahl der versteckten Arbeitsblätter in einer Arbeitsmappe angegeben wird.

1. Drücken Sie Alt + F11 Tasten zum Aktivieren der Microsoft Visual Basic für Applikationen Fenster.

2 Klicken Insert > Modulund fügen Sie den folgenden Code in den neuen ein Modul Fenster.

VBA: Versteckte Blätter zählen.

Sub vhCount()
'Updateby20150602
Dim xWs As Worksheet
Dim xCount As Integer
For Each xWs In Application.ActiveWorkbook.Sheets
    If xWs.Visible Then xCount = xCount + 1
Next
MsgBox "Visible : " & xCount & vbCrLf & _
    "Hidden : " & ActiveWorkbook.Sheets.Count - xCount
End Sub

3. Drücken Sie F5 Wenn Sie die Taste drücken, um den Code auszuführen, wird ein Dialogfeld angezeigt, in dem die Anzahl der ausgeblendeten Arbeitsblätter und die Anzahl der sichtbaren Arbeitsblätter angezeigt werden.

---

Zählen Sie versteckte / sichtbare Blätter mit Kutools for Excel

Wenn Sie mit VBA nicht vertraut sind, können Sie es kostenlos installieren Kutools for Excel um die Anzahl der Blätter, versteckten Blätter und sichtbaren Blätter auf einen Blick zu zählen.

Nachher kostenlose Installation Kutools für Excel, bitte gehen Sie wie folgt vor:

1 Klicken Kutoolen > Navigation um das Fenster anzuzeigen. Siehe Screenshot:

2. Dann klick Arbeitsmappe & Blatt Klicken Sie auf die Schaltfläche, um die Bücher und Arbeitsblätter aufzulisten, und gehen Sie zum unteren Rand des Fensters. Dort finden Sie die Anzahl der Gesamtblätter, versteckten Blätter und sichtbaren Blätter.

TIPP: Wenn Sie keinen Navigationsbereich mehr benötigen, klicken Sie auf Kutoolen > Navigation wieder zu verstecken.

---

Löschen Sie versteckte Blätter oder blenden Sie alle versteckten Blätter mit Kutools for Excel ein

Mit Kutools for ExcelSie können auch alle versteckten Blätter mit einem Klick entfernen.

1. Wenn Sie alle ausgeblendeten Blätter einblenden möchten, klicken Sie einfach auf Kutoolen > Anzeigen Ausblenden > Blende alle versteckten Blätter ein.

2. Wenn Sie alle versteckten Blätter löschen möchten, klicken Sie einfach auf Unternehmen > Arbeitsblatt > Alle ausgeblendeten Blätter löschen. Siehe Screenshot: