Liste Deroulante A Selection Multiple

[leelou971]

bonjour,
en utilisant les controles de formulaire, j'ai donc crée une zone de liste à choix multiple
mon problème: j'aimerais que les choix selectionnés soient affichés dans une colonne ou extraits d'une table de données.
je ne suis pas du tout calée en VBA.

merci d'avance de l'aide que vous pourrez apporter

 

[BOISGONTIER]

Re : Liste Deroulante A Selection Multiple

Bonjour,

Sélection multiple

Private Sub UserForm_Initialize()
  Me.Choix.List = [A1:A10].Value
End Sub

Private Sub B_multiple_Click()
   Me.Choix.MultiSelect = fmMultiSelectMulti
End Sub

Private Sub B_simple_Click()
  Me.Choix.MultiSelect = fmMultiSelectSingle
End Sub

Private Sub B_imprime_Click()
    k = 1
    For i = 0 To Me.Choix.ListCount - 1
        If Me.Choix.Selected(i) = True Then
           Cells(k, 3) = Me.Choix.List(i)
           k = k + 1
        End If
    Next
End Sub

JB

 

[leelou971]

Re : Liste Deroulante A Selection Multiple

merci beaucoup
c'est ce que je voulais, mais n'est-il pas possible d'utiliser les outils d'excel comme les formules plutot que de passer par vba?

 

[Maud44]

Re : Liste Deroulante A Selection Multiple

Bonjour,

Sur le fichier suivant je souhaite faire une macro pour que le nom des agents s'affichent dans une liste déroulante (voir PJ:dans la cellule agent concerné) et que je puisse sélectionner certain agent et que leurs noms s'affichent dans la même cellule.
Comment est-ce possible.


Cordialement