Autres (RESOLU)curseur sur ComboBox a l'affichage

[chaelie2015]

Bonjour Forum
Je cherche le code suivant :
a l'affichage du USF le curseur de la souris soit toujours sur combobox1 ( a titre exemple).
salutations

 

[Staple1600]

Bonjour le fil

Ceci devrait faire le job

Private Sub UserForm_Initialize()
ComboBox1.SetFocus
End Sub

 

[chaelie2015]

Bonjour JM
Merci pour la réponse rapide.
mais si je redémarre mon fichier,( j'ai mets USF a l'ouverture du fichier ),ça ne fonctionne pas?
a+

 

[Staple1600]

Re

Cela fonctionne dans mon test, sur mon fichier
Et ce quand l'userform s'affiche.

 

[chaelie2015]

re
j'ai essayé ce code :
Private Sub Workbook_Open()
UserForm2.Show 0
UserForm2.cmbx_NuméroContrat.SetFocus
End Sub
ça fonctionne pas
A+

 

[Staple1600]

Re

Ce n'est pas ce qu'on peut lire dans le message#2, non !
Si j'ai mis le SetFocus dans Private Sub UserForm_Initialize()
c'est sans doute qu'il y a une raison
Et c'est ce qui fait que cela fonctionne chez moi.

 

[Staple1600]

Re

Voici le code de mon userform

Option Explicit

Private Sub UserForm_Initialize()
ComboBox1.SetFocus
End Sub
Private Sub CommandButton1_Click()
Unload UserForm1
End Sub

Voici le code pour afficher l'userform

Sub showusf()
UserForm1.Show
End Sub

Mon userform contient un ComboBox et un CommandButton
Et quand je clique sur la forme (à laquelle est affectée la macro showusf)
Le curseur se positionne bien dans la combobox.

 

[JM27]

bonjour
clic de droit sur l'userform et ordre de tabulation et tu déplaces les ordres de tabulations comme tu le souhaites

 

[chaelie2015]

Bonjour JM,jm27
merci pour les réponses.
salutations