Clic droit de la souris dans excel

Résolu/Fermé
infodes Messages postés 50 Date d'inscription mardi 26 novembre 2013 Statut Membre Dernière intervention 21 décembre 2023 - 28 sept. 2020 à 19:07
infodes Messages postés 50 Date d'inscription mardi 26 novembre 2013 Statut Membre Dernière intervention 21 décembre 2023 - 30 sept. 2020 à 15:09
Bonjour, je sollicite de nouveau votre aide pour essayer de résoudre un problème... Dans le workbook open d'excel, je part un programme et à la fin du programme, il faut que je fasse un clic droit de la souris qui va exécuter un autre programme. Mon problème, c'est que le clic droit de la souris se faite au niveau du VBA et non d'excel. Je veux dire par là que la fenêtre s'ouvre dans le VBA mais moi j'ai besoin que la fenêtre s'ouvre dans excel.

Voici le code que j'utilise: (que j'ai trouvé sur le net)

'Declare mouse events
Public Declare PtrSafe Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
Public Declare PtrSafe Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Public Const MOUSEEVENTF_LEFTDOWN = &H2
Public Const MOUSEEVENTF_LEFTUP = &H4
Public Const MOUSEEVENTF_RIGHTDOWN As Long = &H8
Public Const MOUSEEVENTF_RIGHTUP As Long = &H10

Sub RightClick()
mouse_event MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0
mouse_event MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0
End Sub

Est-ce que quelqu'un sait si c'est possible d'exécuter ce code à partir du VBA (dans le workbook open, donc sans intervention humaine) pour qu'il s'exécute dans le fichier excel et non qu'il ouvre la fenêtre dans le vba?

Merci de votre aide!

4 réponses

yg_be Messages postés 22708 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 20 avril 2024 1 471
28 sept. 2020 à 19:11
bonjour, as-tu envisagé de nous montrer ce que tu as mis dans workbook open?
0
yg_be Messages postés 22708 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 20 avril 2024 1 471
28 sept. 2020 à 19:17
à quel moment la fenêtre de l'éditeur VBA s'ouvre-t-elle?
0
yg_be Messages postés 22708 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 20 avril 2024 1 471
28 sept. 2020 à 19:16
merci d'utiliser les balises de code, comme expliqué ici: https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
0
infodes Messages postés 50 Date d'inscription mardi 26 novembre 2013 Statut Membre Dernière intervention 21 décembre 2023
29 sept. 2020 à 19:46
Supposer que dans l'événement 'Open', vous avez que la ligne de code qui part le programme : 'rightclick'.

Private Sub Workbook_Open()

    RightClick

End Sub


dans certain programme, je n'ai que cela. J'espère que c'est plus claire.
Merci!
0
yg_be Messages postés 22708 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 20 avril 2024 1 471
Modifié le 29 sept. 2020 à 23:47
quand je fais cela, le clic droit se fait bien dans Excel, pas dans l'éditeur VBA.
0
infodes Messages postés 50 Date d'inscription mardi 26 novembre 2013 Statut Membre Dernière intervention 21 décembre 2023
30 sept. 2020 à 15:09
Oui effectivement, ça fonctionne quand on ouvre le fichier à partir d'excel mais pas si je l'ouvre de l'explorateur windows. C'était mon erreur.

merci pour l'aide :-)
0