VBA: optionbutton1 sans la souris

Bonjour,

Avec la barre d'espace ?

Camille

-----Message d'origine-----
Bonjour

Je fais suivre une question pour laquelle je n'ai pas de
réponse

Depuis un userform contenant divers objets,
j'aimerais faire en sorte que, lorsque le focus
est arrivé sur le bouton d'option qui m'intéresse
(optionbutton1),

par un simple appui la touche <Enter>, je valide
l'option,

.

Bonjour Christian,

Si validé, signifie faire exécuter un code ... essaie ceci :

'---------------------
Private Sub OptionButton1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

If KeyAscii = 13 Then
MsgBox "Bonjour"
End If

End Sub
'---------------------


Salutations!



"Christian Herbé" <herbe@nancy.inra.fr> a écrit dans le message de news:uah%23n4IxDHA.2456@TK2MSFTNGP10.phx.gbl...
Bonjour

Je fais suivre une question pour laquelle je n'ai pas de réponse

Depuis un userform contenant divers objets,
j'aimerais faire en sorte que, lorsque le focus
est arrivé sur le bouton d'option qui m'intéresse(optionbutton1),
par un simple appui la touche <Enter>, je valide l'option,

Bonjour,

Avec la barre d'espace ?

Effectivement, ça marche !

Comme je l'ai dit plus haut, ce n'est pas pour moi alors je fais suivre
à qui de droit !

Encore merci.

Bonjour Christian,

Si validé, signifie faire exécuter un code ... essaie ceci :

'---------------------
Private Sub OptionButton1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

If KeyAscii = 13 Then
MsgBox "Bonjour"
End If

End Sub
'---------------------