Activer une texbox(activex) depuis une option button (activex)

[bobinut60]

Bonjour à tous.
Sur une feuille de calcul, j'ai une case à cocher (Option button - controle activeX) et une zone de texte 'textbox - controle active x).
Je voudrais lorsque que clique sur la case à cocher, afficher le curseur en attente dans la textbox...
je n'y parviens pas, j'ai essayé setfocus mais cela semble fonctionner que dans une userform...
un peu d'aide svp

merci d'avance

 

[laetitia90]

Re : Activer une texbox(activex) depuis une option button (activex)

bonjour bobinut60
essai comme cela

Private Sub OptionButton1_Click()
 ActiveSheet.OLEObjects("Textbox1").Activate
End Sub

ou simplement

Private Sub OptionButton1_Click()
 OLEObjects("Textbox1").Activate
End Sub