VBA Checkbox
09.06.2020 12:26:21
Dieter
Ich bin neu im Bereich VBA Unterwegs und stehe auch schon vor einem Problem,
Ich habe 2 Checkboxen erstellt,eine Schaltet die Textboxen an,und die andere Checkbox schaltet die Textboxen aus.
Jetzt möchte ich das aber noch so haben,wenn ich den Haken bei Checkbox 1 setze der Haken bei Checkbox2 raus ist und umgekehrt,kann mir hier jemand helfen wie ich das lösen kann?
Private Sub CheckBox1_Click()
Dim objForm As msforms.Control
For Each objForm In Me.Controls
Select Case objForm.Name
Case "TextBox1", "TextBox2", "TextBox3", "TextBox4", "TextBox5", "TextBox6",
objForm.Visible = True
End Select
Next
End Sub
Private Sub CheckBox2_Click()
Dim objForm As msforms.Control
For Each objForm In Me.Controls
Select Case objForm.Name
Case "TextBox1", "TextBox2", "TextBox3", "TextBox4", "TextBox5", "TextBox6",
objForm.Visible = False
End Select
Next
End Sub