J'ai un fichier excel ou j'ai réussi à faire un menu déroulant mais j'aimerai faire que l'on puisse cocher plusieurs choix dans la même case. Est-ce possible?
Si oui, quelqu'un peut-il m'aider car ça commence à dépasser mes compétences. J'ai joint le fichier à ce post.
C'est une suite de trois listes de choix, les deux premières sont "standards" mais la troisième passe sous "ActiveX" afin de vous permettre d'avoir un choix multiple, ensuite pour valider ce choix il suffit de cliquer sur le bouton "VALIDER" qui s'est affiché à coté de la troisième liste.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect([D2:D100], Target) Is Nothing And Target.Count = 1 Then
Me.ListBox1.MultiSelect = fmMultiSelectMulti
Me.ListBox1.List = [struct].Value
a = Split(Target, " ")
If UBound(a) >= 0 Then
For i = 0 To Me.ListBox1.ListCount - 1
If Not IsError(Application.Match(Me.ListBox1.List(i), a, 0)) Then Me.ListBox1.Selected(i) = True
Next i
End If
Me.ListBox1.Height = 60
Me.ListBox1.Width = 100
Me.ListBox1.Top = Target.Top
Me.ListBox1.Left = Target.Left + Target.Width
Me.ListBox1.Visible = True
Else
Me.ListBox1.Visible = False
End If
End Sub
Private Sub ListBox1_Change()
For i = 0 To Me.ListBox1.ListCount - 1
If Me.ListBox1.Selected(i) = True Then temp = temp & Me.ListBox1.List(i) & " "
Next i
ActiveCell = Trim(temp)
End Sub
Votre question et vos réponses m'ont bien orientées. J'ai réussi à faire un menu déroulant avec une liste à choix multiple. J'aimerai en faire plusieurs : mon tableur a besoin de 9 menus déroulants à choix multiples sur 9 colonnes.
J'ai utilisé le code de M. Boigontier mais je ne sais pas comment faire pour en avoir plusieurs différents sur plusieurs colonnes.