leeren berercih prüfen
26.04.2008 19:54:33
michi
ich möchte, dass ein bestimmter bereich auf volle zellen überprüft wird.
so gehts nicht, verdeutlich aber vielleicht was ich meine:
Sub test()
Dim a As String
a = ActiveCell.Range("A1:z1").Select
If a = "" Then
MsgBox "leer"
Else
MsgBox "mind. eine volle Zelle"
End If
End Sub
Danke für Eure hilfe.
grüße
michi