Re : Quitter la veille ecran
Re,
voici un code qui simule un clic de souris, mais je pense également comme Eric S que tu devrais déjà tester un simple Sendkeys,
Sub Bas()
SendKeys "{DOWN}", False
End Sub
Private 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)
Private Declare Function GetMessageExtraInfo Lib "user32" () As Long
Private Sub Click()
mouse_event -32767, 0, 0, 0, GetMessageExtraInfo()
mouse_event 2, 0, 0, 0, GetMessageExtraInfo()
mouse_event 4, 0, 0, 0, GetMessageExtraInfo()
End Sub