Dans la cellule B1 j'ai crée une liste (par Donnée/Validation/Liste.....) je
voudrais que cette liste se deroule automatiquement (sans etre obligé de
cliquer sur la fleche), si la valeur de la cellule A1 est par ex "coucou".
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichDenis
Copie ceci dans la feuille module où est ta liste déroulante. Adapte l'adresse de ta cellule contenant ta liste de validation.
La seule chose que fait cette procédure est d'ouvrir la liste de validation pour visualiser le contenu lors d'un simple clic dans la cellule C1
'----------------------------- Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = Range("C1").Address Then SendKeys "%{Down}" End If
End Sub '-----------------------------
Pour le déroulement automatique - > Il y a les flèches de direction + les touches Pageup PageDown + Home + End
"LarryBiro" a écrit dans le message de news: 45ad2eb1$0$22613$ Bonsoir à tous.
Dans la cellule B1 j'ai crée une liste (par Donnée/Validation/Liste.....) je voudrais que cette liste se deroule automatiquement (sans etre obligé de cliquer sur la fleche), si la valeur de la cellule A1 est par ex "coucou".
merci d'avance pour les réponses.
Thierry
Copie ceci dans la feuille module où est ta liste déroulante.
Adapte l'adresse de ta cellule contenant ta liste de validation.
La seule chose que fait cette procédure est d'ouvrir la liste
de validation pour visualiser le contenu lors d'un simple clic
dans la cellule C1
'-----------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = Range("C1").Address Then
SendKeys "%{Down}"
End If
End Sub
'-----------------------------
Pour le déroulement automatique - > Il y a les flèches de direction +
les touches Pageup PageDown + Home + End
"LarryBiro" <pub@evhr.net> a écrit dans le message de news:
45ad2eb1$0$22613$4d4eb98e@read.news.fr.uu.net...
Bonsoir à tous.
Dans la cellule B1 j'ai crée une liste (par Donnée/Validation/Liste.....) je
voudrais que cette liste se deroule automatiquement (sans etre obligé de
cliquer sur la fleche), si la valeur de la cellule A1 est par ex "coucou".
Copie ceci dans la feuille module où est ta liste déroulante. Adapte l'adresse de ta cellule contenant ta liste de validation.
La seule chose que fait cette procédure est d'ouvrir la liste de validation pour visualiser le contenu lors d'un simple clic dans la cellule C1
'----------------------------- Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = Range("C1").Address Then SendKeys "%{Down}" End If
End Sub '-----------------------------
Pour le déroulement automatique - > Il y a les flèches de direction + les touches Pageup PageDown + Home + End
"LarryBiro" a écrit dans le message de news: 45ad2eb1$0$22613$ Bonsoir à tous.
Dans la cellule B1 j'ai crée une liste (par Donnée/Validation/Liste.....) je voudrais que cette liste se deroule automatiquement (sans etre obligé de cliquer sur la fleche), si la valeur de la cellule A1 est par ex "coucou".
