Checkboxes durch Inhalt in einer Zelle freischalte
24.03.2005 12:54:41
micel
Ich möchte checkboxes freischalten, wenn in eine bestimmte Zelle Inhalt eingegeben wird, umgekehrt, ist kein Inhalt in dieser Zelle, dann soll die Checkbox inaktiv bleiben.
Mein Versuch sah so aus:
Private Sub CheckBox198_Click()
Dim rng As Range
Dim iCounter As Integer
Set rng = Range("E5:E5")
For iCounter = 1 To 8
If IsEmpty(rng(iCounter)) Then
("CheckBox").Enabled = False
End Sub
Aber irgendwas mach ich falsch!
Danke!
Anzeige