Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
708to712
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
708to712
708to712
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Leerzellen

Leerzellen
17.12.2005 16:04:02
Klaus
Hallo,
ist es möglich gezielt nach mehreren leeren Zellen zu suchen? Z.B. Suche 3 zusammenhängende Leerzellen in einer Spalte. Danke. Klaus

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

Betreff
Datum
Anwender
Anzeige
AW: Leerzellen
17.12.2005 16:11:43
Josef
Hallo Klaus!
Für Spalte "A" zB. so!
Sub sucheLeerzellen()
Dim rngEmpty As Range, rng As Range
Dim lngLastRow As Long

lngLastRow = Range("A65536").End(xlUp).Row

Set rngEmpty = Range("A1:A" & lngLastRow).SpecialCells(xlCellTypeBlanks)

If Not rngEmpty Is Nothing Then
  For Each rng In rngEmpty
    If IsEmpty(rng.Offset(1, 0)) And IsEmpty(rng.Offset(2, 0)) Then
      MsgBox rng.Address
    End If
  Next
End If

End Sub


'******************************
'* Gruß Sepp
'*
'* Rückmeldung wäre nett!
'******************************

Anzeige
Sorry, aber....
17.12.2005 17:08:28
Josef
Hallo Klaus!
... was soll ich mit deiner Tabelle anfanen?
Du wolltest Leerzellen finden!
Was willst du wo in der Tabelle berechnen?
'******************************
'* Gruß Sepp
'*
'* Rückmeldung wäre nett!
'******************************

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige