XL 2016 UserForm : forcer la saisie sur le textBox

Sylvain133

XLDnaute Nouveau
Bonjour à tous,

J'aimerais savoir comment à l'ouverture d'un UserForm on peut faire pour ne pas cliquer sur la texteBox pour pouvoir saisir du texte mais être directement dessus (sans aide de la souris).

En vous remerciant d'avance pour vos retours.
 

Sylvain133

XLDnaute Nouveau
En illustration voici mon problème (cf.1) et ce que je veux obtenir en ouvrant l'userform sans passer par un clique sours (cf. 2). Sachant que la textbox se situe dans un frame (cadre).
 

Pièces jointes

  • cf1.PNG
    cf1.PNG
    2.6 KB · Affichages: 21
  • cf2.png
    cf2.png
    2.7 KB · Affichages: 18

patricktoulon

XLDnaute Barbatruc
re
demo3.gif
 

Sylvain133

XLDnaute Nouveau
Je vous explique plus clairement, ci-dessous voici mon frame avec mon textbox et mes 2 bouttons. Le boutton "VALIDER" s'active en appuyant sur la touche "Entrée" du clavier (car j'ai mis en propriétés par Default=TRUE). J'aimerai que le boutton "ACTUALISER" s'execute quand on appuie sur la touche F5 du clavier. Merci pour vos réponses encore.
 

Pièces jointes

  • cf2.png
    cf2.png
    2.7 KB · Affichages: 6

patricktoulon

XLDnaute Barbatruc
re
touche F5= keycode 116
si tu es dans ton textbox
j'ai choisi le keyup plutot que le keydown car le focus peut être libéré (probleme avec les textbox )et en plus l'execussion est plus rapide
VB:
Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 116 Then bouton1_click
End Sub
change "bouton1" pour le nom de ton bouton
 

Discussions similaires

Statistiques des forums

Discussions
311 720
Messages
2 081 889
Membres
101 831
dernier inscrit
gillec