[-ANNULLATO-]Ordre des code dans meme sub

[Ilino]

Forum Bonjour and Buon Anno Nuovo
je vous solicite a m'aider pour résoudre mon souci ci dessous :

dans mon USF ( fichier ci rattaché) je souhaite lors de la sélection une donnée dans le ComboBox8 j'aurai automatiquement une valeur qui le correspond ( selon la feuille "Contrat") ce code est fait ( merci bénévole) et fonctionne bien

.......
'chercher et afficher LE Cocontractant selon le N° CONTRAT
LI1 = ComboBox8.ListIndex + 2
TextBox4 = Sheets("Contrats").Cells(LI1, 4)
If ComboBox8.ListIndex = -1 Then TextBox4 = "":
Exit Sub
........

en même temps je souhaite afficher une liste déroulante dans le ComboBox9 automatiquement qui correspond a la donnée de ComboBox8( selon la feuille "Contrat") ce code est fait ( merci bénévole) et fonctionne bien

...........
'afficher la liste ouvrage selon le NUM Contrat
For Each cel In plage 'boucle sur toutes les cellules éditées cel de la plage
    'si la valeur de la cellule cel est égale à la valeur de lq ComboBox1, ajoute la cellule ajdacente à cel (colonne B) à la Combobox2
    If cel.Value = Me.ComboBox8.Value Then Me.ComboBox9.AddItem cel.Offset(0, -1).Value
Next cel 'prochaine cellule de la boucle'''
Exit Sub
.......

MAIS mon grand souci si je rassemble les deux code dans la meme ComboBox ça fonctionne pas ???

Private Sub ComboBox8_Change()

'chercher et afficher LE Cocontractant selon le N° CONTRAT
LI1 = ComboBox8.ListIndex + 2
TextBox4 = Sheets("Contrats").Cells(LI1, 4)
If ComboBox8.ListIndex = -1 Then TextBox4 = "":
Exit Sub

ComboBox8 = UCase(ComboBox8) 'N° CONTRAT en MAJUSCUL

'afficher la liste ouvrage selon le NUM Contrat
For Each cel In plage 'boucle sur toutes les cellules éditées cel de la plage
    'si la valeur de la cellule cel est égale à la valeur de lq ComboBox1, ajoute la cellule ajdacente à cel (colonne B) à la Combobox2
    If cel.Value = Me.ComboBox8.Value Then Me.ComboBox9.AddItem cel.Offset(0, -1).Value
Next cel 'prochaine cellule de la boucle'''
Exit Sub


Me.ComboBox9.Clear 
End Sub

est ce que l'ordre est important ???
grazie

 

[Ilino]

Re : Ordre des code dans meme sub

Bonsoir Forum
si vous permettez je relance mon souci
A+

 

[Ilino]

Re : Ordre des code dans meme sub

Forum Bonjour
je ne sais pas est ce que je dois annuler ce fil et de poser mon souci d'une autre façon??
A+

 

[Ilino]

Re : Ordre des code dans meme sub

Bonjour Forum
Message supprimer
EDIT : FIL ABANDONNE