Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Prüfen ob benannter Bereich existiert

Prüfen ob benannter Bereich existiert
26.06.2004 17:35:57
Sandra
Hallo,
ich möchte prüfen, ob in einem Tabellenblatt ein benannter Bereich namens "Zieltabelle" existiert.
Habe es indirekt mit:
If (IsError(Application.ActiveSheet.Range("Zieltabelle").Address)) Then
.....
probiert, aber es schlägt fehl.
Hat jemand eine bessere Idee ?
Sandra
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Prüfen ob benannter Bereich existiert
Ulf

Sub teste()
If IsError(ActiveSheet.Range("testname").Address) Then
MsgBox "Name nicht vorhanden!"
Else
MsgBox Range("testname").Address(0, 0)
End If
End Sub

Ulf
AW: Prüfen ob benannter Bereich existiert
Sandra
Da sagt mein Excel leider
'Laufzeitfehler....'
:-(
AW: Prüfen ob benannter Bereich existiert
Ulf

Sub teste()
On Error Resume Next
MsgBox Range("testname").Address(0, 0)
If Err <> 0 Then
MsgBox "Nix da!"
End If
End Sub

Ulf
Anzeige
AW: Prüfen ob benannter Bereich existiert
26.06.2004 18:12:20
GraFri
Hallo


Dim BerName         As String
Sub TbInhalt_einf_Zähl()
Dim xBereiche
Worksheets(1).Activate
BerName = "Ergebnis"
' Abfrage, ob Bereich schon vorhanden
Set xBereiche = ActiveWorkbook.Names
For x = 1 To xBereiche.Count
    If xBereiche(x).Name = "Tabelle1!" & BerName Or _
       xBereiche(x).Name = BerName Then
        MsgBox "Achtung, Bereich  " & BerName & "   vorhanden."
        Exit Sub
    End If
Next x
End Sub


Mit freundlichen Grüßen, GraFri
Anzeige
AW: Prüfen ob benannter Bereich existiert
Sandra
Klappt, dankeschön.
;

Forumthreads zu verwandten Themen

Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Prüfen, ob ein benannter Bereich in Excel existiert


Schritt-für-Schritt-Anleitung

Um zu prüfen, ob ein benannter Bereich in Excel existiert, kannst du die folgende VBA-Methode verwenden. Diese Vorgehensweise ist besonders nützlich, wenn du sicherstellen möchtest, dass ein spezifischer Name in deiner Liste vorhandener Names definiert ist.

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu starten.
  2. Gehe zu Einfügen > Modul, um ein neues Modul zu erstellen.
  3. Füge den folgenden Code in das Modul ein:
Sub pruefenObNameExistiert()
    Dim BerName As String
    BerName = "Zieltabelle" ' Ersetze dies durch den gewünschten Namen

    On Error Resume Next
    If Not IsError(Application.ActiveWorkbook.Names(BerName).RefersTo) Then
        MsgBox "Der benannte Bereich '" & BerName & "' existiert."
    Else
        MsgBox "Der benannte Bereich '" & BerName & "' existiert nicht."
    End If
    On Error GoTo 0
End Sub
  1. Schließe den VBA-Editor und führe das Makro aus.

Häufige Fehler und Lösungen

  • Laufzeitfehler: Wenn du einen Laufzeitfehler erhältst, stelle sicher, dass der Name des benannten Bereichs korrekt ist und keine Tippfehler enthält.
  • Namen nicht vorhanden: Wenn die Meldung "Name nicht vorhanden" angezeigt wird, könnte der benannte Bereich in einem anderen Arbeitsblatt oder Arbeitsbuch definiert sein. Überprüfe die Benennung in der Namensverwaltung (Formeln > Namensmanager).

Alternative Methoden

Es gibt auch andere Möglichkeiten, um zu prüfen, ob ein benannter Bereich existiert. Eine einfache Methode ist die Verwendung einer Funktion in Excel:

  1. Verwende die Funktion =IF(ISERROR(NAMED_RANGE), "Nicht vorhanden", "Vorhanden") in einer Zelle, wobei NAMED_RANGE der Name des benannten Bereichs ist.
  2. Dies funktioniert jedoch nur, wenn der benannte Bereich korrekt definiert ist.

Praktische Beispiele

  1. VBA-Beispiel: Das oben angegebene Makro pruefenObNameExistiert prüft, ob der benannte Bereich "Zieltabelle" existiert. Du kannst den Namen einfach anpassen.

  2. Excel-Funktion: Um zu überprüfen, ob ein Wert in einer bestimmten Zelle vorhanden ist, kannst du die Formel =IF(COUNTIF(A1:A10, "Suchwert")>0, "Vorhanden", "Nicht vorhanden") verwenden. So prüfst du, ob ein spezifischer Wert in einem Bereich existiert.


Tipps für Profis

  • Verwende die On Error Resume Next-Anweisung, um Fehler in deinem VBA-Code zu vermeiden, während du die Existenz eines benannten Bereichs prüfst.
  • Halte deine Namen klar und verständlich, um die Verwaltung deiner benannten Bereiche zu erleichtern.
  • Nutze die Funktionalität von Excel, um benannte Bereiche effektiv zu organisieren und zu dokumentieren, damit du einfacher prüfen kannst, ob sie existieren.

FAQ: Häufige Fragen

1. Wie kann ich in Excel prüfen, ob ein Name in einer Liste vorhanden ist?
Du kannst die Funktion =IF(COUNTIF(NamenBereich, "Suchname")>0, "Vorhanden", "Nicht vorhanden") verwenden, um zu prüfen, ob ein spezifischer Name in einer definierten Liste existiert.

2. Was kann ich tun, wenn mein Code nicht funktioniert?
Überprüfe die Namen und stelle sicher, dass sie genau übereinstimmen. Außerdem solltest du sicherstellen, dass der benannte Bereich nicht in einem anderen Arbeitsblatt definiert ist, wenn du nur ein Arbeitsblatt überprüfst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige