Wie ermittelt man die Anzahl der sichtbaren Arbeitsblätter in einer Arbeitsmappe?
In einer großen Arbeitsmappe mit mehreren Blättern sind einige Blätter sichtbar und andere ausgeblendet. In bestimmten Fällen müssen Sie möglicherweise die Gesamtanzahl der sichtbaren Blätter der Arbeitsmappe ermitteln. Wie können Sie diese schnell zählen? Im Folgenden stelle ich Ihnen einige Tricks vor, mit denen Sie die Anzahl der sichtbaren Blätter in einer Arbeitsmappe rasch ermitteln können.
Anzahl der sichtbaren Blätter ausschließlich mit VBA zählen
Anzahl der sichtbaren Blätter/ausgeblendeten Blätter/sämtlicher Blätter mit Kutools für Excel zählen 
Anzahl der sichtbaren Blätter ausschließlich mit VBA zählen
In Excel können Sie statt des manuellen Zählens der sichtbaren Blätter VBA nutzen, um die Anzahl der sichtbaren Blätter schnell zu ermitteln.
1. Drücken Sie Alt + F11, um das Fenster Microsoft Visual Basic für Applikationen zu öffnen, und klicken Sie anschließend auf Einfügen > Modul, um ein neues Modul zu erstellen.
2. Fügen Sie den folgenden VBA-Code in das Modulfenster ein.
VBA: Anzahl der sichtbaren Blätter einer Arbeitsmappe zählen
Sub VisibleSheetsCount()
'UpdatebyKutoolsforExcel20150909
Dim xSht As Variant
Dim I As Long
For Each xSht In ActiveWorkbook.Sheets
If xSht.Visible Then I = I + 1
Next
MsgBox I & " sheets are visible", , "Kutools for Excel"
End Sub
3. Klicken Sie auf die Schaltfläche Ausführen. Anschließend erscheint ein Dialogfeld, das Ihnen die Anzahl der sichtbaren Blätter anzeigt.
Anzahl der sichtbaren Blätter/ausgeblendeten Blätter/sämtlicher Blätter mit Kutools für Excel zählen
Wenn Sie mit VBA nicht vertraut sind, können Sie die Kutools für Excel-Navigation nutzen, um schnell die Anzahl der sichtbaren, ausgeblendeten und aller Blätter anzuzeigen.
1. Öffnen Sie die Arbeitsmappe, deren sichtbare Blätter Sie zählen möchten, und klicken Sie auf Kutools > Navigation. Siehe Screenshot:
2. Anschließend wird auf der linken Seite von Aktuelles Arbeitsblatt die Navigation angezeigt. Klicken Sie auf die Registerkarte Arbeitsmappe und Blatt, um zum Abschnitt Arbeitsmappe und Blatt zu wechseln. Am unteren Rand des Bereichs sehen Sie die Anzahl der sichtbaren Blätter, der ausgeblendeten Blätter sowie aller Blätter (einschließlich sichtbarer und ausgeblendeter). Siehe Screenshot:
Wenn Sie die Navigation ausblenden möchten, klicken Sie einfach auf Kutools > Navigation, um sie auszuschalten.
Kutools für Excel’s Navigation ist leistungsstark: Mit ihr können Sie die Blätterliste, die Liste der Zellennamen und die Liste der Spaltenüberschriften anzeigen. Außerdem lassen sich Bereiche, Bilder und Formeln als Autotexte hinzufügen – und Sie können ein Wort in ausgewählten Arbeitsblättern suchen und ersetzen.Klicken Sie hier, um mehr über Navigation zu erfahren.
Kutools für Excel– Erweitern Sie Excel mit über 300 unverzichtbaren Tools, um Ihre Arbeit schneller und einfacher zu erledigen, und nutzen Sie KI-Funktionen für intelligentere Datenverarbeitung und höhere Produktivität.Jetzt herunterladen
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins