Combobox ...

DANYEL · 19 Mars 2005

Bonsoir les excelliens ...
Encore une fois, j'ai un petit problème :S
J'ai 2 feuilles dans un classeur, l'une comporte une liste composée de 3 plages (source > A1:A500, B1:B500, C1:C500), l'autre comporte une combobox qui affiche une des valeurs de la liste (plage A1:A500). Aussi, je souhaite, par exemple, que lorsque le valeur de la cellule A1 est selectionnée dans la Combobox que la valeur B1 de la liste s'affiche dans une cellule sous la Combobox et que la valeur C1 en fasse de même dans une autre cellule. Idem pour A2 : B2: C2 / A3: B3: D3 etc ... Comment dois-je m'y prendre pour y arriver ?
Je vous remercie toutes et tous par avance ...

DANYEL

myDearFriend! · 19 Mars 2005

Bonsoir (ou boujour peut-être :S ) DANYEL,

Tu trouveras ci-joint un exemple qui devrait correspondre à ton problème je crois...

Très peu de code VBA pour obtenir ce résultat :

Private Sub ComboBox1_Change()
      With ComboBox1
            Range('E23').Value = .List(.ListIndex, 1)
            Range('E24').Value = .List(.ListIndex, 2)
      End With
End Sub

Tout se passe dans les propriétés de la ComboBox et notamment :[ol][li]ColumnCount = 3[/li]
[li]ColumnWidth = ';0 pt;0 pt'[/li]
[li]ListFillRange = 'Listes' (une plage nommée correspondant aux listes de la feuille 2)[/li]
[li]Style = '2 - fmStyleDropDownList'[/li][/ol]
Cordialement.
[file name=CorrespondanceListe.zip size=14211]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CorrespondanceListe.zip[/file]

DANYEL · 19 Mars 2005

Bonjour Philippe ...
Je te remercie beaucoup pour ton aide, cela fonctionne.
Cordiales salutations.
DANYEL

myDearFriend! · 19 Mars 2005

Heu... Y'a pas d'quoi

... sauf que moi, c'est pas philippe, c'est Didier !

(c'est marqué dans ma signature lol)

DANYEL · 19 Mars 2005

Oups ... Autant pour moi. Mille excuses ...

Combobox ...

DANYEL

Guest

myDearFriend!

XLDnaute Barbatruc

Pièces jointes

DANYEL

Guest

myDearFriend!

XLDnaute Barbatruc

DANYEL

Guest

Discussions similaires