Über eine UF trage ich Werte ein.
Funktioniert auch,NUR sollte bei CheckBox2 statt "Wahr" eine "1" stehen,
bei "FALSCH" sollte "" eingetragen werden.
Private Sub CheckBox2_Click()
CheckBox2.Visible = IIf(CheckBox2.Value = "WAHR", 0, 1)
End Sub
Ws.Cells(StartZeile, 27) = Me.CheckBox2
Könnte mir dazu bitte jemand weiterhelfen?Gruß Heinz