Bon voila j’ai un petit problème. Je sais que sous Excel, on arrive a faire une combo box dans une cellule de telle sorte a ce que cette cellule soit un choix multiple en fonction d’une colonne de la feuille.
Par exemple dans A1 à A4 j’ai les valeurs suivantes:
Pomme
Orange
Poire
Framboise
Ma combo devrait pouvoir permettre le choix entre ces 4 fruits. J’ai bien trouvé comment mettre un élément de formulaire, mais visiblement c’est pas avec ca que ca fonctionne…
Sub Annuler()
Test_Sortie = False
UserForm1.Hide
End Sub
Sub Valider()
Test_Sortie = True
UserForm1.Hide
End Sub
Sub Choisir()
UserForm1.Ma_Liste.ControlTipText = Range(“Info_Bulle”)
‘Pour dé-sélectionner les lignes de la liste
’ ListCount = Nombre de lignes de la Liste
’ Selected = Commence à zéro (va de 0 à ListCount - 1)
For i = 1 To UserForm1.Ma_Liste.ListCount
UserForm1.Ma_Liste.Selected(i - 1) = False
Next
UserForm1.Show
If Test_Sortie = False Then Exit Sub
Range(“Résultat”).Clear
Range(“Résultat”).Select
For i = 1 To UserForm1.Ma_Liste.ListCount
If UserForm1.Ma_Liste.Selected(i - 1) = True Then
ActiveCell.Value = UserForm1.Ma_Liste.List(i - 1)
ActiveCell.Offset(1).Select
End If
Next
End Sub[/code]
si tu veux je te filer mon exemple avec 4 choix en fichier xls.
Les combos “lights” (avec des contours fins sans ascenseurs) sont simplement remplies automatiquement par les valeurs d’en dessous.
Sinon tu fais
créer deux colonne avec 1;Pomme,2;Orange,etc… en A1:B5 par exemple
barre d’outils/formulaire/coches Boites à outils contrôle.
Insère zone de Liste modifiable.
BoundColumn=1
ColumnCount=2
LinkedCell=La cellule de ton tableau que tu veux modifier par cette combo
ListFillRange A1:B5
N’oublies pas de te remettre en mode “normal” (cliques sur l’icône de l’équerre de façon à qu’il ne soit pas enfoncé).
Si tu veux cacher l’index (la colonne 1) tu fais:
ColumnWidths: 0 pt;15 pt .
[quote name=’[PERE Cil’ date=’ 17 Mar 2005, 16:40’]Bon ca y ressemble mais c’est toujours pas ca :P. Cf le fichier que j’ai posté ;P.
[right][post=« 342209 »]<{POST_SNAPBACK}>[/post][/right][/quote]
Tu ne sais pas chercher Je ne connaissais pas et j’ai trouvé:
sélectionne la cellule ou les cellules (une colonne en général)