Discussion :

[Sibuxian]

Bonjour,

Je voudrais savoir comment programmer une liste déroule via VBA sous Excel.
Les données restent sur une feuille excel mais j'affecte a une cellule une liste déroule via VBA afin de facilté le changement du contenu de la liste.
mais je ne sais pas du tout comment procéder.

Combobox.List ?
Selection.Validation ?

si quelqu'un peut me renseigner.
Merci

[zyhack]

Bonjour

Créer un nouveau classeur puis
voir les commentaires pour faire un essai

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
'creer une liste sur Feuil3 de A1 à Axx
'lancer la routine crée une plage nommé liste
 
Sub CreerListe()
  Dim plage As String
  With Worksheets("Feuil3")
    plage = .Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row).Address
    ActiveWorkbook.Names.Add Name:="Liste", RefersTo:="=Feuil3!" & plage
  End With
End Sub
 
'lancer la routine crée une liste de selection
'dans la Feuil1 en cellule A1
 
Sub UtiliserListe()
  With Worksheets("Feuil1").Range("A1").Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=liste"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
  End With
End Sub

[Sibuxian]

j'avais obtenu quelque chose de ce style avec l'enregistreur de macro.
Mais la c'est plus clair, je vais tester, merci