Bonsoir le forum,
J'ai un petit soucis que je n'arrivepas à résoudre, malgré les différents fils que j'ai consulté sur le forum, et que j'ai tenté d'adapter.
J'ai un Usf avec plusieurs combo. je voudrai en lier 2
je vous met le bout de code que j'ai tenté de faire et qui n'a rien donné:
Excusez mon ignorance. Mais avec ces conditions je ne m'en sort définitivement pas.
Les # correspondent à une série de 4 chiffres, qui peuvent changer, donc la condition doit se faire uniquement sur la première valeur (S ou C).
Pourriez-vous m'éclairer? Je ne comprend plus rien, malgré plusieurs méthodes que j'ai trouvé.
Petite info ma cbx4 prend sa source dans l'inialize comme ceci:
Je pense ne pas être loin de la solution mai je sèche totalement, d'autant que je n'ai aucun message d'erreur.
Merci d'avance pour votre aide et conseils toujours si précieux.
J'ai un petit soucis que je n'arrivepas à résoudre, malgré les différents fils que j'ai consulté sur le forum, et que j'ai tenté d'adapter.
J'ai un Usf avec plusieurs combo. je voudrai en lier 2
je vous met le bout de code que j'ai tenté de faire et qui n'a rien donné:
Code:
Private Sub ComboBox4_Change()
Dim x As Integer
Dim y As Integer
Me.ComboBox5.Clear
With Sheets("BDD")
x = ("S####")
y = ("C####")
If ComboBox4.Value = x Then Me.ComboBox5.AddItem .Range("e5")
If ComboBox4.Value = y Then Me.ComboBox5.AddItem .Range("e2:e4")
End With
End SubLes # correspondent à une série de 4 chiffres, qui peuvent changer, donc la condition doit se faire uniquement sur la première valeur (S ou C).
Pourriez-vous m'éclairer? Je ne comprend plus rien, malgré plusieurs méthodes que j'ai trouvé.
Petite info ma cbx4 prend sa source dans l'inialize comme ceci:
Code:
With Sheets("BDD")
ComboBox4.List = .Range("b2:b" & .Range("b65536").End(xlUp).Row).ValueJe pense ne pas être loin de la solution mai je sèche totalement, d'autant que je n'ai aucun message d'erreur.
Merci d'avance pour votre aide et conseils toujours si précieux.