Hallo,
ich habe einen VBA Code welcher bei einem Klick auf einen Button eine UserForm aufruft, die dann alle beschriebenen Zeilen anzeigt.
Hinter jedem Datensatz(Namen) sitzt eine Checkbox die auf True gesetzt ist.
Es ist so eine Art Anwesenheitskontrolle, wenn jemand da war CheckBox gleich True ansonsten False.
Jetzt brauche ich eine Funktion, welche mir eine ganze Gruppe auf False setzt, wenn ich eine dafür vorgesehene CheckBox anklicke.
Derzeit erzeuge ich die CheckBoxen so:
Dim chb As MSForms.CheckBox
If zeilen < 1 Then Exit Sub
Set colChb = New Collection
For i = 8 To CInt(zeilen)
Set chb = Me.Controls.Add("Forms.CheckBox.1", "CheckBox0" & CStr(i), True)
With chb
.Top = -100 + i * .Height
.Left = 325
.Value = True
End With
colChb.Add chb
Next i
Ich hoffe Ihr könnt mir helfen.
Gruß
Bene