Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Combobox visible ou non et Setfocus

  • Initiateur de la discussion Initiateur de la discussion FJPT
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

FJPT

XLDnaute Junior
Bonsoir à toutes et à tous

J'ai 2 combobox successives où le curseur passe bien de l'une à l'autre par un seul appui sur TAB ou ENTER tant qu'elle sont visibles toutes les deux.

Si je cache la deuxiéme (Visible = False) afin de ne la rendre visible par l'événement Exit de la première qu'après mise à jour de celle-ci il faut que je tape 2 fois TAB ou ENTER pour passer le curseur sur la deuxème malgré le Setfocus sur cette dernière.

Si quelqu'un a l'explication, je lui en serai reconnaissant car je bloque là-dessus depuis un moment.

Bonne soirée à toutes et à tous.

FJPT
 
Re : Combobox visible ou non et Setfocus

Bonsoir FjPT,

Essaie quelque chose comme ceci:
Rendre visible la combobox2 sur évènement AfterUpDate qui se produit avant Exit.

en rouge la condition à remplacer
Code:
Private Sub ComboBox1_AfterUpdate()
   [COLOR=red] If ComboBox1.ListCount > 0 Then
[/COLOR]        ComboBox2.Visible = True
    End If
End Sub

Private Sub ComboBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    If ComboBox2.Visible Then ComboBox2.SetFocus
End Sub

A+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

D
Réponses
2
Affichages
12 K
D
H
Réponses
17
Affichages
41 K
hesiode23
H
P
Réponses
5
Affichages
5 K
Pierre
P
D
Réponses
4
Affichages
2 K
Djlolo2
D
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…