ComboBox sous Excel

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…

Quelqu’un a une idée?

Il faut faire ça en Visual Basic. Ca fait une paire de temps que je m’y suis pas plongé.

Bon pas de problèmes pour le visual basic, ca je maitrise :P, seulement, hum comment on fout du VB dans Excel?

[code]Public Test_Sortie

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.

N’hésite pas à regarder l’aide de VB sous Excel, elle est très bien faite et tu trouveras sans doute des exemples pour chaques cas d’utilisation.

Mmm je suis perplexe… disons que j’ai un fichier XLS d’exemple ici:

www.tinkymouse.pwp.blueyonder.co.uk/bps.xls

Et visiblement celui ci n’utilise pas du VB…

[quote name=’[PERE]Cil’ date=’ 17 Mar 2005, 11:55’]Mmm je suis perplexe… disons que j’ai un fichier XLS d’exemple ici:

www.tinkymouse.pwp.blueyonder.co.uk/bps.xls

Et visiblement celui ci n’utilise pas du VB…
[right][post=“342060”]<{POST_SNAPBACK}>[/post][/right][/quote]

Ce n’est pas le même genre de combobox, en effet, ton fichier utilise n’utilise pas de VB mais je n’arrive plus non plus à trouver comment faire.

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 .

Tout cela est fait sans une ligne de code.

Bon ca y ressemble mais c’est toujours pas ca :P. Cf le fichier que j’ai posté ;P.

[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 :stuck_out_tongue: Je ne connaissais pas et j’ai trouvé:

  • sélectionne la cellule ou les cellules (une colonne en général)
  • Menu Données/Validations
  • onglet Options
  • sélectionne Liste
  • coche liste déroulante dans la cellule
  • source : source des données de ta combo

merci j’aurais appris quelque chose :stuck_out_tongue:

De rien… c’est juste que j’ai trop l’habitude d’open office :stuck_out_tongue: