Bonjour à tous.

Afin d'ouvrir automatiquement un menu déroulant positionné en A1, je souhaiterais utiliser la fonction keybd_event pour simuler l'appuie sur les touches Alt+ Flèche du bas seulement lorsque je sélectionne A1.

J'ai trouvé beaucoup d'exemples sur le web mais j'avoue ne pas comprendre le principe de cette fonction.

Voici le code d'exemple qui permet d'appuyer sur la touche "e". (je n'ai pas pu faire mieux)

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, ActiveSheet.Range("A1")) Is Nothing Then
keybd_event &H45, 0, 0, 0
End If
End Sub
Merci d'avance pour votre aide et très bonne soirée à tous.