Click droit souris [Résolu]

Signaler
Messages postés
32
Date d'inscription
jeudi 18 mai 2006
Statut
Membre
Dernière intervention
5 août 2010
-
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
-
Bonjour,
J'ai une mshflexgrid et je voudrais que qd je fais un click gauche, ca ouvre la form1 et qd je fais un click droit ca ouvre la form2.
Est-ce possible. Si oui comment faire??
Merci pour votre aide

3 réponses

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
47
Salut,

Je pense que le mshflexgrid doit avoir un événement MouseDown.

Ce qui suit est un exemple pour un form mais ca devrait être équivalent

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) 
    If Button = vbLeftButton Then 
        'Ouvre la feuille correspondant au click Gauche
    Else 
        'Ouvre la feuille correspondant au click droit
    End If 
End Sub 
 

<small> Coloration syntaxique automatique [AFCK]</small>
       

@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée
Messages postés
32
Date d'inscription
jeudi 18 mai 2006
Statut
Membre
Dernière intervention
5 août 2010

Ok, merci bcp Julien! Je ne savais pas qu'on pouvait faire ca directement.
A+
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
62
Attention...
"Pas le bouton gauche" ne signifie pas nécessairement "le bouton droit" :

If Button = vbLeftButton Then
'Ouvre la feuille correspondant au click Gauche
ElseIf Button = vbRightButton Then
'Ouvre la feuille correspondant au click droit
End If