if not zelle = leer
09.07.2003 18:23:20
michael
ich suche eine Abfrage, um nur leere Zellen zu identifizieren.
In den Zellen
A1 steht 1
A2 steht 0
A3 steht nichts
Obwohl der Wert für b=0 im Macro angegeben wird, wird die Abfrage wie bei einer leeren Zelle (c=leer) behandelt.
In den Zellen
B1 steht nicht leer
B2 steht leer
B3 steht leer
Wie muß die Abfrage richtig lauten?
Sub test()
a = Range("a1").Value
b = Range("a2").Value
c = Range("a3").Value
If Not a = leer Then
Range("b1") = "nicht leer"
Else: Range("b1") = "leer"
End If
If Not b = leer Then
Range("b2") = "nicht leer"
Else: Range("b2") = "leer"
End If
If Not c = leer Then
Range("b3") = "nicht leer"
Else: Range("b3") = "leer"
End If
End Sub
Danke für eure Hilfe
Michael