Synchroniser 2 combobox

Question

Bonjour, j'ai une feuille avec plusieurs combobox qui sont remplis &#224; l'aide de SQL server. Je veux tout simplement synchroniser ces 2 combobox de sorte que si je change la valeur dans le 1er combobox, la valeur respective sera afich&#233;e dans le 2&#232;me combobox. Autrement dit, si je change un ID_Fournisseur dans le combobox 1, je veux qu'il m'affiche le fournisseur respectif dans le combobox 2.

Merci d'avance, Fran&#231;ois

titi035 · Answer

Salut, 

Il faut utilis&#233; l'evenement "Combo1_Change()" . 

Private Sub Combo1_Change()

if Combo1.text<>"" then 
    Combo2.Text = RenvoiFournisseurSQL(ID_Fournisseur)
endif

End Sub

Cette fonction est appel&#233;e &#224; chaque changement de text Combo1. De cette fa&#231;on, quand Combo1.text est modifi&#233;, tu peut aussi mettre &#224; jour Combo2.text.

A+,
Titi035

ideschamps · Answer

Bonjour,

Sur ta premi&#232;re combo, tu interceptes le lost focus.
Dans cette fonction, tu r&#233;cup&#232;re l'id s&#233;lectionn&#233;, et ensuite tu peux forcer le fournisseur de ton autre combo : autrecombo.text="fournisseur".

Isa

titi035 · Answer

Comme &#231;a, t'as le choix!!  ;)

Fabfranck · Answer

Excellent merci &#224; vous, tout fonctionne &#224; merveille !

titi035 · Answer

N'oublie pas d'accepter les r&#233;ponses ;)

A+,
Titi035

Synchroniser 2 combobox

5 réponses

Discussions similaires