Tipps "n" Tricks
Anwender-Software - Excel

Leere Zeile in einem Bereich finden 

Thema:

Excel 97, 2000 und 2002

Problem:

Je umfangreicher eine Tabelle, desto schwieriger ist es, den Überblick zu wahren. Ich möchte zum Beispiel immer wieder feststellen, ob es in einem bestimmten Bereich noch eine leere Zelle gibt. Kann man das über ein Makro lösen?

Lösung: 

Verwenden Sie für diese Aufgabenstellung das folgende kleine Makro:

Sub ErsteLeereZelle()
  Dim Bereich As Range
  Dim Zelle As Range

  Set Bereich = Range("B3:O120")
  For Each Zelle In Bereich
    If Zelle.Value = "" Then MsgBox "Erste leere Zelle " _
    & Zelle.Address: Zelle.Select
  Next Zelle
End Sub


Der Bereich B3:O120 wird nun Zelle für Zelle durchlaufen - der Mauszeiger stoppt an der ersten gefundenen leeren Zelle.

 

Tipps "n" Tricks
Anwender-Software - Excel