Clic par une macro [Résolu]

Signaler
Messages postés
122
Date d'inscription
lundi 12 décembre 2011
Statut
Membre
Dernière intervention
12 juillet 2021
-
Messages postés
122
Date d'inscription
lundi 12 décembre 2011
Statut
Membre
Dernière intervention
12 juillet 2021
-
Bonjour,
Le pointeur de la souris positionné n'importe où sur un site web, existe-t-il une instruction pour faire automatiquement un clic gauche à la souris ?
Je rêve sans doute mais sait-on jamais !
Merci et bonne journée

2 réponses

Messages postés
16410
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
22 juillet 2021
877
bonjour,
peut-être ainsi (je n'ai jamais essayé):
Public Declare 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

Private Sub ClicGauche()
  mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
  mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0
End Sub
Messages postés
122
Date d'inscription
lundi 12 décembre 2011
Statut
Membre
Dernière intervention
12 juillet 2021
3
Bonjour et merci pour ton attention
J'ai tout essayé, rien à faire, ça marche pas.

Pas grave, je m'en sors quand même.... la macro ouvre la course hippique, je laisse 10 secondes pour cliquer manuellement sur ce fameux "bouton "RAPPORTS DEFINITIFS" puis la macro continue.
Encore merci
Bonne journée