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

combobox ouverture au passage de la souris

maval

XLDnaute Barbatruc
bonjour

Est-il possible d'ouvrir une combobox au passage de la souris?

Merci d'avance
 

BOISGONTIER

XLDnaute Barbatruc
Repose en paix
Re : combobox ouverture au passage de la souris

Bonjour,

Dans un formulaire

Code:
Private Sub ComboBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  Me.ComboBox1.SetFocus
  SendKeys "{F4}"
End Sub

Dans une feuille de calcul

Code:
Private Sub ComboBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  Me.ComboBox1.Activate
  Me.ComboBox1.DropDown
End Sub


JB
 

Pièces jointes

  • FormListBoxCurseurSurvol-1.xls
    48.5 KB · Affichages: 47
Dernière édition:

Pierrot93

XLDnaute Barbatruc
Re : combobox ouverture au passage de la souris

Bonjour,

ceci devrait pouvoir le faire également :
Code:
Private Sub ComboBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
ComboBox1.DropDown
End Sub
 

Discussions similaires

Réponses
8
Affichages
447
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…