Case option activé selon combobox VBA

matrix · 12 Avril 2008

Bonjour à tous,

Je voudrais faire en sorte que, selon la valeur de mon ComboBox, la case option qui porte le même nom se coche en cliquand sur le bouton Activé.

Mais j'ai beau essayé plusieurs chose, je n'y arrive pas.

À moi qu'il aurait une autre façon de le faire sans utiliser les case à cocher?

Je veux seulement qu'il me me dise tous les sélections du combobox.

Ex: Si je sélectionne dans le ComboBox la valeur Test 1, il cochera la case à cocher Test 1. Si ensuite je sélectionne la valeur Test 3, il cochera la case à cocher 3 toute en laissant la case à cocher Test 1 et ainsi de suite.....

Merci de votre aide!

Excel_lent · 12 Avril 2008

Re : Case option activé selon combobox VBA

Salut Matrix, re aux autres.

Pourquoi pas avec une Listebox avec options (propriété ListStyle) ?

matrix · 12 Avril 2008

Re : Case option activé selon combobox VBA

Super idée oui,

Je regarde ça et je te reviens.

Je crois que c'est la meilleur idée pour parvenir à ce que je veux faire.

Merci

matrix · 12 Avril 2008

Re : Case option activé selon combobox VBA

Re bonjour,

Comment faire pour le nom que je viens de cocher dans la listebox se copie dans la cellule H1?

Donc par la suite, si je coche la suivante, dans la cellule H1 il va inscrire la nouvelle sélection du listebox.

Merci!

Excel_lent · 12 Avril 2008

Re : Case option activé selon combobox VBA

Re, ainsi qu'aux autres.

Avec une macro du genre

Code:

 Private Sub ListBox1_Change()
   Range("H1") = "Test " & ListBox1.ListIndex + 1
 End Sub

tu n'auras qu'une réponse (celle du dernier click) !

matrix · 12 Avril 2008

Re : Case option activé selon combobox VBA

Ça fonctionne si les noms du listebox = Test.

Parcontre s'il y à différent nom ex: jean, steve etc. la ça marche pas!

matrix · 12 Avril 2008

Re : Case option activé selon combobox VBA

oh, j'ai trouvé:

Code:

Private Sub CommandButton3_Click()
 Sheets("Coller").Range("H11") = ListBox1.List(ListBox1.ListIndex)
End Sub

Merci pour ton aide

Case option activé selon combobox VBA

matrix

XLDnaute Occasionnel

Pièces jointes

Excel_lent

XLDnaute Impliqué

Pièces jointes

matrix

XLDnaute Occasionnel

matrix

XLDnaute Occasionnel

Excel_lent

XLDnaute Impliqué

matrix

XLDnaute Occasionnel

matrix

XLDnaute Occasionnel

Discussions similaires