Checkbox mit klassen auf Userform
chris
ich habe unten angehängt einen code aus einem Klassenmodul meiner datei.
Habe dazu eine frage und würde mich über Hilfe freuen.
Momentan ist es so ich erstelle auf einer Userform Checkboxen zur Laufzeit.
Und ich will immer wenn ich Checkbox 1 anklicke das mir austomatisch die Checkbox 2 angeklickt wird.
Das funktioniert auch mit meinem Klassenmodul.Aber es kommt dann wenn ich checkbox 1 anklicke auch immer die Meldung "Du Hast Check 2 angeklickt"
Aber das will ich nicht weil ja die Checkbox 2 durch das priogramm angelickt wird.
Kann ich es anders umgehen also nur die checkbox z.b auf false setzten ?
Also wie mache ich es das wenn die checkbox 1 angeklickt wird auch die 2 selektiert wird aber ohne msgbox.?
Vielen Dank im voraus und schönen Montag an alle !
Option Explicit
Public WithEvents objDynChBox As MSForms.CheckBox
Private Sub objDynChBox_Click()
If objDynChBox.Caption = "check 1" Then
MsgBox ("1 wurde geklickt")
UserForm1.Controls("chk_check 2").Value = True
Else
End If
MsgBox "Hallo du hast " & objDynChBox.Caption & " geklickt !", vbInformation
End Sub