activer bouton option

[gigi71850]

bonjour,
Je cherche comment activer un optionbutton1 par un click sur la textbox1
Merci

 

[13GIBE59]

Re : activer bouton option

Bonjour.

Par double clic :

Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
OptionButton1.Value = True
End Sub

ou

Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
OptionButton1
End Sub

 

[gigi71850]

Re : activer bouton option

Merci de votre réponse rapide, mais je veut que l'on clique 1 seul fois sur la zone de textbox1 pour la compléter et que sa active le optionbouton1

Merci

 

[fhoest]

Re : activer bouton option

bonsoir,
a essayer:

Private Sub TextBox1_enter()
OptionButton1.Value = True
End Sub

fhoest

 

[gigi71850]

Re : activer bouton option

Merci pour vos solution trés rapide

le code de FHOEST fontionne parfaitement

Private Sub TextBox1_enter()
OptionButton1.Value = True
End Sub

Merci