Liste déroulante vba

Re : Liste déroulante vba

Salut,

Tu peux essayer avec ce tuto
Utiliser les contrôles dans un UserForm, en VBA Excel - Club d'entraide des développeurs francophones

Remplir une ListBox sans doublons
Vba

Private Sub UserForm_Initialize()
Dim Cell As Range
Dim Unique As New Collection
Dim Valeur As Range
Dim i As Integer

'Récupère la derniere ligne non vide dans la colonne A
i = Range("A65536").End(xlUp).Row

On Error Resume Next
'boucle sur les cellules de la colonne A
For Each Cell In Range("A1:A" & i)
'Stocke les données dans une collection
'(La collection n'accepte que des données uniques et permet donc
' de filtrer facilement les doublons).
Unique.Add Cell, CStr(Cell)
Next Cell
On Error GoTo 0

'Boucle sur le contenu de la collection pour alimenter la ListBox
For Each Valeur In Unique
Me.ListBox1.AddItem Valeur
Next Valeur
End Sub


BON COURAGE
@+

Re : Liste déroulante vba

Je vais regarder et voir si j'y arrive

Merci beaucoup