Fehlermeldung wenn keine CheckBox aktiv
28.05.2019 10:21:05
Michael
ich habe auf einer UserForm einen Frame mit zwei Checkboxen und einem Button
Wähle ich nur die erste Checkbox aus und drücke den Button alles OK
Wähle ich nur die zweite Checkbox aus und drücke den Button alles OK
Wähle ich beide Checkboxen aus und drücke den Button alles OK
Wähle ich keine von beiden Checkboxen aus und Drücke den Button hätte ich gerne eine MsgBox mit dem Hinweis das keine Option gewählt wurde. Aber das funktioniert leider nicht.
Ich weiß nicht wie viele Kombinationen ich schon probiert habe, aber leider funktionierten alle nicht.
Hier mal mein letzter Versuch, welcher jedoch auch nicht funktioniert hat
Private Sub cmdbtn_execute_Click()
' Ist die erste CheckBox abgehackt
If UsrFrm_Config.CheckBox1 = True Then
' Setze alle Werte in Spalte 9 auf OK
' Den Code brauche ich nicht, das funkioniert schon
End With
End If
'Kontrollieren ob die zweite CheckBox ausgewählt wurde
If UsrFrm_Config.CheckBox2 = True Then
' Alle Werte in Spalte "K" löschen die nicht ">>" enthalten.
' Den Code brauche ich nicht, das funkioniert schon
End With
End If
If UsrFrm_Config.CheckBox1 = False + UsrFrm_Config.CheckBox2 = False Then
'Für den Fall das keine Checkbox ausgewählt wurde
UsrFrm_Hinweis.Show
End If
End Sub
Danke im Voraus
Anzeige