Ist der Bereich leer?

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: Ist der Bereich leer?
von: Remo
Geschrieben am: 20.11.2003 10:24:51

Hallo zusammen

Ich habe gerade einen kleinen Knopf:
Ich möchte herausfinden ob der Bereich ("D4:G4") leer ist.
Gelingt mir auch mit dem unteren Makro.
Ich suche jedoch eine schönere Lösung. Möchte gleich den ganzen
Bereich angeben können.

Weiss jemand eine Lösung? Besten dank im Voraus

Remo


Sub istleer()
If IsEmpty(Range("D4")) = True And IsEmpty(Range("E4")) = True _
And IsEmpty(Range("F4")) = True And IsEmpty(Range("G4")) = True Then
MsgBox "Bereich ist leer!"
End If
End Sub

Bild


Betrifft: MsgBox WorksheetFunction.CountA([d4:e4]) = 0
von: Boris
Geschrieben am: 20.11.2003 10:33:23

Grüße Boris


Bild


Betrifft: Danke!
von: Remo
Geschrieben am: 20.11.2003 10:38:23




Bild


Betrifft: AW: Ist der Bereich leer?
von: Willie
Geschrieben am: 20.11.2003 10:37:57

Hallo Remo hast du es schon mal so versucht?
Gruß Willie


Sub istleer()
If IsEmpty(Range(Cells(4, 4), Cells(4, 7))) = True Then
MsgBox "Bereich ist auch leer!"
End If
End Sub



Bild

Beiträge aus den Excel-Beispielen zum Thema " Ist der Bereich leer?"