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

Prüfen ob gesamte Zeile leer ist

Forumthread: Prüfen ob gesamte Zeile leer ist

Prüfen ob gesamte Zeile leer ist
19.10.2004 18:13:06
FI-Azubi
hallo zusammen,
ich habe folgendes problem. ich möchte aus einem datenimport alle zeilen abarbeiten bis keine einträge mehr vorhanden sind. da die zeilen teilweise lücken aufweisen, muss die laufbedingung meiner schleife quasi heißen:
"wiederhole solange bist du auf eine vollständig leere zeile triffst"
nur wie setze ich das um?
ich habe folgendes schon probiert:
while not(IstNull(Tabelle1.rows(n).entirerow))
.
.
.
wend
läuft aber nicht...
vielleicht hat ja wer von euch ne ahnung.
gruß
FI-Azubi
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Prüfen ob gesamte Zeile leer ist
PeterW
Hallo (Realnamen sind hier gerne gesehen!),
beispielsweise so:

Sub LeereZeile()
Dim lgRow As Long
Do
lgRow = lgRow + 1
Loop Until WorksheetFunction.CountA(Rows(lgRow)) = 0
MsgBox "Erste leere Zeile ist Zeile " & lgRow
End Sub

Gruß
Peter
Anzeige
;
Anzeige

Infobox / Tutorial

Prüfen, ob gesamte Zeile leer ist in Excel


Schritt-für-Schritt-Anleitung

Um zu überprüfen, ob eine gesamte Zeile in Excel leer ist, kannst du die folgende VBA-Makro-Funktion verwenden. Dieses Skript geht durch die Zeilen und sucht nach der ersten vollständig leeren Zeile:

Sub LeereZeile()
    Dim lgRow As Long
    Do
        lgRow = lgRow + 1
    Loop Until WorksheetFunction.CountA(Rows(lgRow)) = 0
    MsgBox "Erste leere Zeile ist Zeile " & lgRow
End Sub
  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.
  3. Kopiere den obigen Code in das Modulfenster.
  4. Schließe den VBA-Editor und kehre zu Excel zurück.
  5. Drücke ALT + F8, um das Makro auszuführen und wähle LeereZeile.

Häufige Fehler und Lösungen

  • Fehler: "Variable nicht definiert"

    • Stelle sicher, dass du die Variablen korrekt deklariert hast. Im obigen Beispiel ist lgRow als Long deklariert.
  • Fehler: Schleife läuft endlos

    • Überprüfe, ob das Arbeitsblatt Daten enthält. Eine endlos laufende Schleife tritt auf, wenn du in ein leeres Arbeitsblatt suchst.

Alternative Methoden

Wenn du keine VBA-Programmierung verwenden möchtest, kannst du auch die folgende Excel-Formel nutzen, um leere Zeilen zu identifizieren:

  1. Füge in einer neuen Spalte die folgende Formel ein:
    =WENN(ZÄHLENWENN(A1:Z1; "<>")=0; "Leer"; "Nicht leer")
  2. Ziehe die Formel nach unten, um die gesamte Datensätze zu überprüfen.

Diese Methode kann nützlich sein, wenn du keine Makros ausführen möchtest oder eine schnelle Sichtprüfung benötigst.


Praktische Beispiele

Angenommen, du hast in Spalte A bis Z Daten. Du möchtest überprüfen, welche Zeilen leer sind:

  1. Verwende das VBA-Makro, um die erste leere Zeile zu finden.
  2. Alternativ kannst du die oben genannte Formel in Spalte AA verwenden, um zu sehen, welche Zeilen leer sind.

Beide Methoden sind effektiv, um leere Zeilen in Excel zu überprüfen und helfen dir, deine Daten effizient zu verwalten.


Tipps für Profis

  • Schnellere Ausführung: Wenn du mit großen Datenmengen arbeitest, erwäge, die Bildschirmaktualisierung während der Ausführung des Makros auszuschalten:

    Application.ScreenUpdating = False
    ' Dein Code hier
    Application.ScreenUpdating = True
  • Fehlerbehandlung hinzufügen: Füge On Error Resume Next am Anfang deines Makros hinzu, um Fehler zu ignorieren und die Ausführung fortzusetzen.


FAQ: Häufige Fragen

1. Wie kann ich das Makro anpassen, um mehrere leere Zeilen zu finden?
Du kannst die Schleife erweitern und eine Liste der leeren Zeilen speichern. Anstatt nur die erste leere Zeile anzuzeigen, kannst du alle leeren Zeilen in einer Array- oder Collection-Variablen speichern.

2. Gibt es eine Möglichkeit, leere Zeilen automatisch zu löschen?
Ja, du kannst ein Makro schreiben, das leere Zeilen identifiziert und sie entfernt. Verwende dafür eine Schleife, die durch jede Zeile iteriert und die EntireRow.Delete-Methode anwendet, wenn die Bedingung für eine leere Zeile erfüllt ist.

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