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

Forumthread: Bezugfehler #BEZUG finden

Bezugfehler #BEZUG finden
10.05.2016 13:32:04
r2d2
Hallo,
gibt es eine "schnelle" Methode, um in einem Arbeitsblatt zu ermitteln, ob ein Bezugsfehler in einer Zelle vorliegt?
Natürlich könnte man mit einer Schleife von Zelle A1:Z2000 jede Zelle einzeln abfragen.
Aber geht das auch "schneller"?
Danke, Gruß, r2d2

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bezugfehler #BEZUG finden
10.05.2016 13:39:26
Hajo_Zi
Formeln, Formelüberwachung, Fehlerüberprüfung

AW: Bezugfehler #BEZUG finden
10.05.2016 13:42:00
r2d2
Ja super, und wie würde das ganze per VBA funktionieren mit entsprechender "Ausgabe" ob ein Fehler vorhanden ist oder nicht?
Danke, Gruß, r2d2

Bezugfehler #BEZUG! per VBA finden
10.05.2016 14:22:10
NoNet
Hi C3PO,
hier ein VBA-Ansatz : Es werden nur alle Zehllen überprüft, die einen Fehlerwert benhalten :
Sub ShowRefErrorCells()
'Zeigt Zellen mit #BEZUG!-Fehler an
'10.05.2016, NoNet - www.excelei.de
Dim rngErrorCells As Range, rngC As Range, rngErrRef As Range
On Error Resume Next
'Zellen mit Funktionen und #BEZUG!-Fehler :
Set rngErrorCells = Cells.SpecialCells(xlCellTypeFormulas, 16)
On Error GoTo 0
If Not rngErrorCells Is Nothing Then
For Each rngC In rngErrorCells
If rngErrRef Is Nothing Then
Set rngErrRef = rngC
Else
Set rngErrRef = Union(rngErrRef, rngC)
End If
Next
End If
'Zellen mit konstanten Werten und #BEZUG!-Fehler :
Set rngErrorCells = Cells.SpecialCells(xlCellTypeConstants, 16)
On Error GoTo 0
If Not rngErrorCells Is Nothing Then
For Each rngC In rngErrorCells
If rngErrRef Is Nothing Then
Set rngErrRef = rngC
Else
Set rngErrRef = Union(rngErrRef, rngC)
End If
Next
End If
If Not rngErrRef Is Nothing Then
MsgBox rngErrRef.Address, vbOKOnly, "#BEZUG!-Fehler im Tabellenblatt"
End If
End Sub

Salut, NoNet
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Bezugfehler #BEZUG in Excel finden und beheben


Schritt-für-Schritt-Anleitung

Um Bezugfehler (#BEZUG!) in Excel schnell zu finden, kannst Du die folgende Methode nutzen:

  1. VBA-Editor öffnen: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Neues Modul erstellen: Klicke im Menü auf Einfügen > Modul.

  3. VBA-Code einfügen: Kopiere den folgenden Code in das Modul:

    Sub ShowRefErrorCells()
       'Zeigt Zellen mit #BEZUG!-Fehler an
       Dim rngErrorCells As Range, rngC As Range, rngErrRef As Range
       On Error Resume Next
       'Zellen mit Funktionen und #BEZUG!-Fehler :
       Set rngErrorCells = Cells.SpecialCells(xlCellTypeFormulas, 16)
       On Error GoTo 0
       If Not rngErrorCells Is Nothing Then
           For Each rngC In rngErrorCells
               If rngErrRef Is Nothing Then
                   Set rngErrRef = rngC
               Else
                   Set rngErrRef = Union(rngErrRef, rngC)
               End If
           Next
       End If
       'Zellen mit konstanten Werten und #BEZUG!-Fehler :
       Set rngErrorCells = Cells.SpecialCells(xlCellTypeConstants, 16)
       On Error GoTo 0
       If Not rngErrorCells Is Nothing Then
           For Each rngC In rngErrorCells
               If rngErrRef Is Nothing Then
                   Set rngErrRef = rngC
               Else
                   Set rngErrRef = Union(rngErrRef, rngC)
               End If
           Next
       End If
       If Not rngErrRef Is Nothing Then
           MsgBox rngErrRef.Address, vbOKOnly, "#BEZUG!-Fehler im Tabellenblatt"
       End If
    End Sub
  4. Makro ausführen: Schließe den VBA-Editor und gehe zurück zu Excel. Drücke ALT + F8, wähle ShowRefErrorCells und klicke auf Ausführen. Dadurch werden alle Zellen mit Bezugfehler angezeigt.


Häufige Fehler und Lösungen

  • Fehlerhafte Daten: Wenn Du einen ungültigen Zellbezug hast, überprüfe die Zellen, auf die verwiesen wird. Stelle sicher, dass die referenzierten Zellen existieren.
  • VBA-Fehler: Falls der VBA-Code nicht funktioniert, stelle sicher, dass Du die richtigen Berechtigungen hast, um Makros auszuführen.
  • Leere Zellen: Manchmal können leere Zellen als #BEZUG! angezeigt werden. Überprüfe die Formeln in diesen Zellen.

Alternative Methoden

  1. Bedingte Formatierung: Du kannst eine bedingte Formatierung verwenden, um Zellen mit Bezugfehlern zu kennzeichnen.

    • Markiere den Bereich, den Du überprüfen möchtest.
    • Gehe zu Start > Bedingte Formatierung > Neue Regel.
    • Wähle Formel zur Ermittlung der zu formatierenden Zellen verwenden und gib die Formel =ISTFEHLER(A1) ein (ersetze A1 durch die erste Zelle des markierten Bereichs).
  2. Fehlerüberprüfungs-Tool: In Excel gibt es das integrierte Fehlerüberprüfungs-Tool. Gehe zu Formeln > Fehlerüberprüfung, um mögliche Bezugfehler zu finden.


Praktische Beispiele

  • Beispiel 1: Wenn Du eine Formel wie =A1+B1 hast und A1 gelöscht wurde, wird ein Bezugfehler #BEZUG! angezeigt.
  • Beispiel 2: Eine Formel wie =SVERWEIS(D1;A:B;2;FALSCH) kann ebenfalls zu einem Bezugfehler führen, falls der Bereich A:B nicht vorhanden ist.

Tipps für Profis

  • Fehlerquelle identifizieren: Nutze die Funktion =ISTFEHLER() oder =ISTNV() in Deinen Formeln, um zu überprüfen, ob ein Fehler vorliegt.
  • Zellbezüge überprüfen: Wenn Du oft auf externe Daten zugreifst, achte darauf, dass die Datenquellen immer verfügbar sind.
  • Makros automatisieren: Wenn Du regelmäßig Bezugfehler überprüfen musst, überlege, das Makro zu automatisieren, damit es bei jedem Öffnen der Datei ausgeführt wird.

FAQ: Häufige Fragen

1. Wie kann ich alle Bezugfehler in einem großen Arbeitsblatt finden?
Verwende das oben beschriebene VBA-Skript, um schnell alle Zellen mit Bezugfehlern zu identifizieren.

2. Was bedeutet der Fehler #BEZUG! in Excel?
Der Fehler #BEZUG! tritt auf, wenn eine Formel auf eine Zelle verweist, die nicht mehr existiert oder ungültig ist.

3. Kann ich Bezugfehler auch ohne VBA finden?
Ja, Du kannst bedingte Formatierung oder das Fehlerüberprüfungs-Tool in Excel verwenden, um Bezugfehler zu erkennen.

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