La grosse seche

[toine84]

BONSOIR A TOTI !

j'ai un ptit problème(qui va faire rire certains).Voilà je viens de faire un userform avec 2 combobox, je souhaite les relier;

le combobox 1 à une donnée, si cette donnée et par ex RENAULT alors une liste contenu dans la feuil2 colonne A(r4,fuego,laguna....) va directement dans le combobox2

pareille si le combobox1 à une donnée (ex : peugeot) alors une liste contenu dans la feuil2 colonne B( 405?205.....) va directement dans le combobox2

merci pour votre aide je séche depuis des heures

ps : je suis super débutant

 

[Victor21]

Re : La grosse seche

Bonjour, toine84.

ps : je suis super débutant

Tout le monde a été un jour, débutant.

Pour "super bien débuter", commence donc par joindre ton fichier !
On ne sait pas comment tu alimentes tes comboboxes, où se situent tes données ? listes?

 

[Pierrot93]

Re : La grosse seche

Bonjour à tous

regarde peut être ce lien, tu devrais y trouver ta réponse...
Listes en cascade

pas top ton titre... ne permettra aucune recherche ultérieure...

bonne journée
@+

 

[toine84]

Re : La grosse seche

Bonsoir à tous !!

J'ai bien lu tous vos liens et je vous en remercie , effectivement la soluce est bien dans la liste en cascade,
En revenche pour un débutant certaine fonction semble obscure mais bon en tatonan;;;;

Set f = Sheets("FEUIL2")
Set MonDico = CreateObject("Scripting.Dictionary")
For Each c In Range(f.[A2], f.[A65000].End(xlUp))
If c.Value <> "" Then MonDico.Item(c.Value) = c.Value
Next c
Me.ComboBox2.List = MonDico.items
SendKeys "{F4}"

ce qui serait sympa s'est de comprendre comment fonctionne chaque ligne (lSendKeys "{F4}") me parrait tres etrange!!!

bonsoir à tous et toutes