optionbutton und textfenster in der Userform

[RulerofDarkness]

Hey meine Frage ist ob es möglich ist durch das drücken eines optionbuttons ein textbox verschwinden zu lassen. Hier das hab ich in den Code der Textbox geschrieben:


Private Sub TextBox1_Change()
If OptionButton1 = True Then Visible = True Else Visible = False

End Sub

Bei mir hats bis jetzt noch nicht geklappt

 

[Yoah]

Moin,

dein Code kann nicht funktionieren, weil
1. das Prog nicht weiß, was Visible gemacht werden soll!
2. du hast die If-Bedingung nicht geschlossen!
3. die falsche Sub benutzt, benutze die OptionButton1_Click

Versuchs mal so:

Private Sub OptionButton1_Change()
' wenn der OptionButton1 geklickt wurde, läft dieses Sub ab
 
If OptionButton1 = True Then ' der Button wird abgefragt
TextBox1.Visible = True ' die Textbox wird angesprochen
Else
TextBox1.Visible = False ' die Textbox wird angesprochen
End if
 
End Sub

Edit: Code geändert

 

[RulerofDarkness]

ah ich habs es muss nicht click sein sonder change xD