Code pour liste déroulante

TURGUT-BEY Messages postés 13 Date d'inscription   Statut Membre Dernière intervention   -  
gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je veux mettre ce code dans la colonne F a partir de F1 (ouvre la liste en F7 d'un simple pointage de la souris)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" And Target.Count = 1 Then
SendKeys "%{down}"
If Target = "" Then
Target = Range("Liste")(1)
End If
End If
End Sub


Merci de me donner les étape pas à pas.

Grand merci à vous.

1 réponse

gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
Bonjour,

Merci de me donner les étape pas à pas
Si tu avais consacré ton temps de rédaction de question à une simple recherche, il y a longtemps que tu aurais ta réponse.

https://www.commentcamarche.net/applis-sites/bureautique/549-creer-des-listes-deroulantes-dans-excel/
0