Discussion :

[a.dequidt]

Boujour,

Je cherche a créer une liste déroulante ou les données de cette liste sont situées dans les cellules "Z1:Z5" sachant que le nombre de données peut varier. Le nombre total de données est située dans la cellule L1.

Savez vous comment faire?

Merci

[ouskel'n'or]

Ta liste, tu veux la placer dans une feuille de calculs ou dans un userform ?

[a.dequidt]

Etant donné que je souhaite réutiliser la valeur choisie, je pense qu'il vaut mieu que je mette dans une cellule. j'ai essayer de faire une validation de donnée mais comme le nombre de données peut varier, je ne sais pas comment gérer ça

[neupont]

J'ai eu à gérer ce genre de problème... ma solution pourra peut-être te convenir.

Il faut mettre ce code derrière la feuille où se trouvent les valeurs de la liste, événement Worksheet / Change.

Ici les données de ma liste sont en colonne A, à partir de la ligne 7.
La macro détecte tout changement dans la feuille mais ne se déclenche que si ce changement a lieu en colonne A et après la ligne 6.
Le nom de ma plage, auquel je fais référence pour la constitution de la liste déroulante, est "liste_admins".

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
Private Sub Worksheet_Change(ByVal Target As Range)
 
' Redéfinition de la plage de la liste déroulante quand on ajoute ou supprime une entrée
 
Dim var_active, var_range, var_refers, libelle_liste As String
 
On Error GoTo fin
 
If Target.Row > 6 And Target.Column = 1 Then
    var_active = ActiveCell.Address
 
    i = 7
    Do While Cells(i, Target.Column) <> ""
        i = i + 1
    Loop
    i = i - 1
 
    var_range = "A7:A" & i
    var_refers = "=Paramètres!R7C1:R" & i & "C1"
    libelle_liste = "liste_admins"
 
    Range(var_range).Select
    ActiveWorkbook.Names.Add Name:=libelle_liste, RefersToR1C1:=var_refers
    Range(var_active).Select
 
End If
 
fin:
 
End Sub

[a.dequidt]

J'aurai préférer utiliser une validation des données, mais le probleme que je rencontre est que la liste est "infinie", car étant donné que je ne connais pas la longueur de la liste j'ai pris toute la colonne ou était les données.

[neupont]

Oui c'est bien le but de mon exemple de limiter la liste aux cellules utilisées.
La boucle du "i" sert à ça.