Wie prüft man, ob ein bestimmter Zellenname in Excel vorhanden ist?
Bevor Sie ein VBA-Skript ausführen, sollten Sie prüfen, ob ein benannter Bereich in der aktuellen Arbeitsmappe vorhanden ist. Der in diesem Artikel bereitgestellte VBA-Code ermöglicht es Ihnen, schnell zu überprüfen, ob ein bestimmter Zellenname in Excel existiert.
Überprüfen Sie mit VBA-Code, ob ein bestimmter Zellenname vorhanden ist
Überprüfen Sie mit VBA-Code, ob ein bestimmter Zellenname vorhanden ist
Sie können den folgenden VBA-Code ausführen, um schnell zu prüfen, ob ein bestimmter Zellenname in der aktuellen Arbeitsmappe vorhanden ist.
1. Drücken Sie gleichzeitig die Tasten Alt+F11, um das Fenster Microsoft Visual Basic für Applikationen zu öffnen.
2. Klicken Sie im Fenster Microsoft Visual Basic für Applikationen auf Einfügen > Modul. Kopieren Sie anschließend den folgenden VBA-Code, und fügen Sie ihn in das Fenster ein.
VBA-Code: Überprüfen, ob ein bestimmter Bereich in Excel vorhanden ist
Sub CheckRanges()
Dim chkRange As Range
Dim areasName(2) As String
Dim chkCnt As Long
Dim i As Integer
areasName(0) = "new"
areasName(1) = "MyRange"
areasName(2) = "Range2"
Application.ScreenUpdating = False
For i = 0 To 2
On Error Resume Next
chkCnt = Len(ThisWorkbook.Names(areasName(i)).Name)
On Error GoTo 0
If chkCnt <> 0 Then
Set chkRange = Range(areasName(i))
MsgBox "This Range: '" & areasName(i) & "' DOES exist!", vbInformation, "Kutools for Excel"
chkCnt = 0
Else
MsgBox "This Range: '" & areasName(i) & "' does NOT exist!", vbInformation, "Kutools for Excel"
End If
Next i
Application.ScreenUpdating = True
End SubHinweise:
3. Drücken Sie die Taste F5, um den Code auszuführen. Anschließend erscheinen nacheinander Kutools für Excel-Dialogfelder, die Ihnen mitteilen, ob der Name „Begrenzter Bereich“ vorhanden ist oder nicht. Klicken Sie bitte nacheinander auf die Schaltflächen OK, um die Dialogfelder zu schließen. Siehe Screenshot:
Verwandte Artikel:
- Wie prüft man in Excel, ob das erste Zeichen einer Zelle ein Buchstabe oder eine Zahl ist?
- Wie prüft man in Excel, ob ein Zellenwert zwischen zwei Werten liegt?
- Wie prüft man in Excel, ob eine Zelle mit einem bestimmten Zeichen beginnt oder endet?
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