Liste deroulante excel2007 parametrage en VBA

Résolu/Fermé
croco - Modifié par croco le 8/08/2011 à 18:24
Morgothal Messages postés 1236 Date d'inscription jeudi 22 avril 2010 Statut Membre Dernière intervention 19 mai 2015 - 10 août 2011 à 09:36
Bonjour,

dans excel j'aimerai savoir si il est possible de changer la zone qui compose les différant champs de la liste déroulant créer à partir de l'onglet dévelopeur

par exemple le champs de la liste sont en A1: A7 et je voudrai passer à A1:A15 car de nouveau champs sont à inclure le tout en VBA

en esperant avoir une réponce avant le 20/8/11

merci

3 réponses

Morgothal Messages postés 1236 Date d'inscription jeudi 22 avril 2010 Statut Membre Dernière intervention 19 mai 2015 183
9 août 2011 à 09:28
Bonjour,
Oui c'est possible, avec ce bout de code :

Sub Test_pour_un_croco()
Dim ligne As Integer
ligne = 0

'recherche de la dernière ligne remplie dans la colonne A
Do
    ligne = ligne + 1
Loop Until Cells(ligne, 1) = ""

'modification de la zone de la liste déroulante
ActiveSheet.DropDowns("Drop Down 1").Select
    With Selection
        .ListFillRange = "$A$1:$B$" & ligne - 1
    End With
End Sub

Drop Down 1 est bien sûr le nom de ta liste déroulante.
Tiens nous au courant si cela fonctionne ou non ! (Mais chez moi ça marche)

A+
1
alors j'ai une autre question comment nome tu la liste créer à partir de l'onget developpeur
1
Morgothal Messages postés 1236 Date d'inscription jeudi 22 avril 2010 Statut Membre Dernière intervention 19 mai 2015 183
10 août 2011 à 09:36
Il faudrait fouiller un peu, mais tu peux retrouver le nom en enregistrant une macro qui utilise la liste déroulante.

Par exemple, Outils>Macro>Nouvelle Macro
Et lors de l'enregistrement, tu changes la taille de la liste.
Tu arrêtes l'enregistrement, et dans l'éditeur VBA (Alt+F11), le code enregistré est dans le dossier Modules>Module1.
Et ce code nomme la liste déroulante.
1