Wie kann man mit Excel VBA prüfen, ob eine Zelle oder ein Bereich aus mehreren Zellen leer ist?

Wie kann man mit Excel VBA prüfen, ob eine Zelle oder ein Bereich aus mehreren Zellen leer ist?

Heute erfahren Sie, wie Sie mit Visual Basic for Applications auf einfache Weise überprüfen können, ob eine oder mehrere Zellen leer sind. Der Inhalt ist relevant für Excel 2019 / 365, 2016 und frühere Versionen von Microsoft Office.

Vorarbeit

Bevor Sie mit der Codierung mit VBA in Excel beginnen, müssen Sie sicherstellen, dass Ihre Registerkarte „Entwicklung“ aktiviert ist. Wenn dies nicht der Fall ist, schauen Sie sich bitte dieses kurze Tutorial an .

Überprüfen, ob der Excel-Zellenbereich mit VBA leer ist

  • Öffnen Sie in Excel Ihre Visual Basic-Umgebung, indem Sie Alt+F11 drücken
  • Fügen Sie den folgenden Code als Prozedur in Ihr Arbeitsblatt oder alternativ in ein dediziertes VBA-Modul ein.
Sub Check_Cell_is_empty_alt()

Dim rng As Range
Set rng = Selection

For Each Cell In rng

    If IsEmpty(Cell.Value) = True Then
        
    Debug.Print ("Empty")
    Else
        Debug.Print ("Not Empty")
    End If
Next Cell


End Sub


  • Gehen Sie zu Ihrer Tabelle und wählen Sie einen beliebigen Zellbereich aus.
  • Gehen Sie zurück zum Visual Basic-Editor und stellen Sie sicher, dass der Direkt-Viewer (STRG+G) sichtbar ist – da die Debug.Print-Methode im Code ihr Ergebnis in diesem Fenster ausgibt.
  • Drücken Sie F5, um Ihren Code auszuführen.
  • Sehen Sie sich die Ergebnisse im Direktfenster an.

Wie kann man mit Excel VBA prüfen, ob eine Zelle oder ein Bereich aus mehreren Zellen leer ist?

  • Alle leeren Zellen werden identifiziert.

Mögliche Erweiterungen des Codes: Sie können diesen Code natürlich nach Bedarf erweitern, falls Sie daran interessiert sind, leere Werte zu überspringen oder einfach nichts zu tun, falls die Zellen nicht voll sind. Ebenso können Sie prüfen, ob der Bereich selbst leer ist, also keine schwarzen Kästchen enthalten sind.

Überprüfung nicht leerer Felder

Auf die gleiche Weise können Sie die IsEmpty-Eigenschaft verwenden, um nach Feldern zu suchen, die nicht leer sind.

 If Not IsEmpty(Cell.Value) = True Then
        Debug.Print ("Not Empty")
    Else
        Debug.Print ("Empty")
    End If

Bonus: Verwenden Sie den folgenden Code, wenn Sie auch leere Zellen hervorheben möchten.

Dim i As Long Dim c As Long Dim myRange As Range Dim myCell As Range Setze myRange = Range("A1:A10") Für jede myCell in myRange ' c = c + 1 If IsEmpty(myCell) Then myCell.Interior.Color = RGB(255, 87, 87) i = i + 1 End If Next myCell MsgBox _ "Es gibt insgesamt " &Ampere; ich & " leere Zelle(n) aus " &Ampere; c & "."


Ingwer 2.7.53.0

Ingwer 2.7.53.0

Ginger ist eine kostenlose Rechtschreib- und Grammatikprüfung.

Blöcke

Blöcke

Blocks ist ein Denkspiel für Grundschüler der 3. Klasse, mit dem sie ihre Erkennungs- und Sehfähigkeiten trainieren können. Es wird von Lehrern in das Programm zur Unterstützung des IT-Unterrichts aufgenommen.

Mathway

Mathway

Mathway ist eine sehr nützliche App, die Ihnen bei der Lösung all jener mathematischen Probleme helfen kann, die ein komplexeres Werkzeug als den integrierten Taschenrechner Ihres Geräts erfordern.

Adobe Presenter

Adobe Presenter

Adobe Presenter ist eine E-Learning-Software von Adobe Systems, die auf der Microsoft Windows-Plattform als Microsoft PowerPoint-Plug-in verfügbar ist.

Tukan 2.3.0

Tukan 2.3.0

Toucan ist eine Bildungstechnologieplattform. Es ermöglicht Ihnen, eine neue Sprache zu lernen, während Sie auf gängigen, alltäglichen Websites surfen.

ENetViet 24.2

ENetViet 24.2

eNetViet ist eine Anwendung, die Eltern mit der Schule verbindet, in der ihre Kinder studieren, damit sie die aktuelle Lernsituation ihres Kindes klar verstehen können.

Duolingo

Duolingo

Duolingo – Sprachen kostenlos lernen, oder einfach Duolingo, ist ein Bildungsprogramm, mit dem Sie viele verschiedene Sprachen lernen und üben können.

RapidTyping

RapidTyping

RapidTyping ist ein praktisches und benutzerfreundliches Tastatur-Trainingstool, mit dem Sie Ihre Tippgeschwindigkeit verbessern und Rechtschreibfehler reduzieren können. Mit Lektionen für viele verschiedene Niveaus bringt Ihnen RapidTyping bei, wie Sie tippen oder bestehende Fertigkeiten verbessern.

MathType 7.4.10.53

MathType 7.4.10.53

MathType ist eine interaktive Gleichungssoftware des Entwicklers Design Science (Dessci), mit der Sie mathematische Notationen für Textverarbeitung, Präsentationen, E-Learning usw. erstellen und kommentieren können. Dieser Editor wird auch zum Erstellen von TeX-, LaTeX- und MathML-Dokumenten verwendet.

Grammatikalisch

Grammatikalisch

Die KI-gestützten Apps von Grammarly helfen Menschen, effektiver zu kommunizieren. Millionen von Benutzern verlassen sich täglich auf Grammarly, um ihre Nachrichten, Dokumente und Social-Media-Beiträge klarer, fehlerfrei und professioneller zu gestalten.