ausgewählte CheckBoxen zählen!
28.08.2005 10:21:37
wuntschi
ich würde gerne über eine Schleife die ausgewählten CheckBoxen einés UserForms zählen.
derzeit habe ich das wie folgt gelöst:
Dim CheckBoxAnzahlIP As Integer
CheckBoxAnzahlIP = 0
If CheckBox1 = True Then
CheckBoxAnzahlIP = CheckBoxAnzahlIP + 1
End If
If CheckBox2 = True Then
CheckBoxAnzahlIP = CheckBoxAnzahlIP + 1
End If
If CheckBox3 = True Then
CheckBoxAnzahlIP = CheckBoxAnzahlIP + 1
End If
If CheckBox4 = True Then
CheckBoxAnzahlIP = CheckBoxAnzahlIP + 1
End If
If CheckBox5 = True Then
CheckBoxAnzahlIP = CheckBoxAnzahlIP + 1
End If
If CheckBox6 = True Then
CheckBoxAnzahlIP = CheckBoxAnzahlIP + 1
etc.
Gruß
wuntschi