Zellen mit #NV finden und per Msg Box anzeigen
Schritt-für-Schritt-Anleitung
Um in Excel auf #NV zu prüfen und eine Msg Box anzuzeigen, wenn Fehler gefunden werden, kannst du den folgenden VBA-Code verwenden:
-
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
-
Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.
-
Kopiere den folgenden Code in das Modul:
Sub FehlerPruefen()
Dim lRow As Long
lRow = ActiveSheet.Range("B65536").End(xlUp).Row
With ActiveSheet.Range("J1:L" & lRow).SpecialCells(xlCellTypeFormulas, 16)
.Interior.ColorIndex = 6
MsgBox ("ACHTUNG! Fehler in" & Chr(10) & .Address)
End With
End Sub
-
Schließe den VBA-Editor und gehe zurück zu Excel.
-
Führe das Makro aus, indem du ALT + F8 drückst, das Makro auswählst und auf Ausführen klickst.
Dieser Code prüft die Spalten J bis L bis zur letzten befüllten Zeile in Spalte B und zeigt alle Zellen mit dem Fehler #NV an.
Häufige Fehler und Lösungen
Alternative Methoden
Du kannst auch die Funktion ZÄHLENWENN verwenden, um #NV-Werte zu zählen und gegebenenfalls eine Nachricht anzuzeigen:
=WENN(ZÄHLENWENN(J1:L2000; "#NV")>0; "EINGABE VERGESSEN"; "")
Diese Formel kannst du in eine beliebige Zelle einfügen, um zu prüfen, ob es #NV-Werte in dem angegebenen Bereich gibt.
Praktische Beispiele
Ein praktisches Beispiel für den VBA-Code, um nur die Fehler in den Spalten J, K und L anzuzeigen:
Sub FehlerInSpalten()
With ActiveSheet.Range("J1:L2000").SpecialCells(xlCellTypeFormulas, 16)
MsgBox "Fehler gefunden in: " & .Address
End With
End Sub
Dieser Code zeigt eine Msg Box mit den Adressen der Zellen an, die den Fehler #NV enthalten.
Tipps für Profis
- Bedingte Formatierung: Nutze die bedingte Formatierung, um Zellen mit #NV hervorzuheben. Gehe zu
Start > Bedingte Formatierung und wähle Neue Regel.
- Automatisierung: Du kannst das Makro so einstellen, dass es automatisch beim Öffnen der Datei ausgeführt wird. Füge dazu den Code in das
Workbook_Open-Ereignis im DieseArbeitsmappe-Modul ein.
FAQ: Häufige Fragen
1. Wie kann ich die Msg Box anpassen?
Du kannst den Text in der Msg Box nach Belieben anpassen. Ersetze einfach den Text innerhalb der Anführungszeichen.
2. Kann ich die Prüfung auf andere Spalten ausweiten?
Ja, ändere einfach den Bereich in der With-Anweisung, z.B. Range("A1:L" & lRow).
3. Was mache ich, wenn ich nur bestimmte Fehler anzeigen möchte?
Du kannst die SpecialCells-Methode anpassen, um nur bestimmte Typen von Fehlern anzuzeigen, indem du den entsprechenden Fehlercode verwendest.