Wie prüfen Sie, ob ein Blatt in einer Arbeitsmappe vorhanden ist?
Wenn Ihre Arbeitsmappe Dutzende oder sogar Hunderte von Arbeitsblättern enthält, kann die Suche nach einem bestimmten Blatt äußerst zeitaufwendig sein. Im Folgenden stellen wir Ihnen einen VBA-Code sowie ein praktisches Tool vor, mit dem Sie blitzschnell prüfen können, ob ein bestimmtes Arbeitsblatt in der Arbeitsmappe vorhanden ist.
Prüfen, ob ein Blatt in einer Arbeitsmappe vorhanden ist – mit VBA
Prüfen, ob ein Blatt vorhanden ist, und zu diesem wechseln mit Kutools für Excel 
Prüfen, ob ein Blatt in einer Arbeitsmappe vorhanden ist
Führen Sie die folgenden Schritte aus, um den VBA-Code zu kopieren und auszuführen und so zu prüfen, ob ein Blatt in der aktuellen Arbeitsmappe vorhanden ist.
1. Drücken Sie Alt + F11, um das Fenster Microsoft Visual Basic for Applications anzuzeigen.
2. Klicken Sie im geöffneten Fenster auf Einfügen > Modul, um ein neues Modulfenster zu öffnen, und fügen Sie anschließend den folgenden VBA-Code in dieses Fenster ein.
VBA: Prüfen Sie, ob ein Blatt in der Arbeitsmappe vorhanden ist.
Function CheckSheet(pName As String) As Boolean
'Updateby20140617
Dim IsExist As Boolean
IsExist = False
For i = 1 To Application.ActiveWorkbook.Sheets.Count
If Application.ActiveWorkbook.Sheets(i).Name = pName Then
IsExist = True
Exit For
End If
Next
CheckSheet = IsExist
End Function3. Speichern Sie diesen Code, kehren Sie zum Arbeitsblatt zurück und wählen Sie eine leere Zelle aus, um die folgende Formel einzugeben: =CheckSheet(„Sheet1“) („Sheet1“ steht für den Namen des Blatts, dessen Vorhandensein Sie prüfen möchten). Drücken Sie anschließend die Enter-Taste. Der Wert FALSE zeigt an, dass das Blatt nicht vorhanden ist, während TRUE anzeigt, dass es in der aktuellen Arbeitsmappe vorhanden ist.
Prüfen, ob ein Blatt vorhanden ist, und zu diesem wechseln mit Kutools für Excel – mit VBA
Mit der oben beschriebenen benutzerdefinierten Funktion können Sie lediglich prüfen, ob ein Blatt vorhanden ist – was zugegebenermaßen etwas umständlich ist. Mit Kutools für Excel hingegen listet die Navigation alle Blattnamen für Sie auf. Scrollen Sie einfach durch die Liste oder filtern Sie die Blattnamen, um das gewünschte Blatt blitzschnell zu finden. Sobald Sie es entdeckt haben, klicken Sie direkt darauf, um sofort zum entsprechenden Blatt zu wechseln.
Nachdem Sie kostenlos installiertKutools für Excel haben, gehen Sie wie folgt vor:
1. Öffnen Sie die Arbeitsmappe, in der Sie prüfen möchten, ob ein bestimmter Blattname vorhanden ist, und klicken Sie anschließend auf Kutools > Navigation. Siehe Screenshot:
2. Klicken Sie im erscheinenden Bereich auf die Schaltfläche Arbeitsmappe und Blatt, um den Bereich zu erweitern. Dort sehen Sie die vollständige Liste aller Blattnamen und können durch diese scrollen, um den gewünschten Blattnamen zu finden.
3. Alternativ aktivieren Sie einfach die Schaltfläche Filter, geben die gewünschten Schlüsselwörter des Blattnamens ein und lassen so den gesuchten Blattnamen anzeigen. Klicken Sie anschließend auf den Blattnamen, um direkt zu diesem Blatt zu wechseln.
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