userform : combobox dépendate

[tofoo]

Bonjour,

je cherche a faire un userform (jusqu'ici tout va bien) avec des combobox qui interagisse entre elle : quand je rentre une donnée dans combobox1, le contenu de combobox 2 change.

Je souhaite traiter les données dans l'onglet "Info" dans la colonne I pour les 2 combobox "Job Role Position".

Les cases en violets étant les themes principaux et en dessous leurs sous themes.

Quelqu'un pourrez m'aider ??

Merci

 

[tofoo]

Re : userform : combobox dépendate

up.........

 

[Guest]

Re : userform : combobox dépendate

bonjour tofoo,

Pièce jointe sur le forum s'il te plaît. Merci

A+

 

[tofoo]

Re : userform : combobox dépendate

La PJ compressé fais 66 ko.

Elle ne passe donc pas sur le site, je l'ai mise sur un site d'upload :

http://cjoint.com/?hdtwwRJCAm

 

[Jam]

Re : userform : combobox dépendate

Salut,

Euh, désolé j'ai pas la réponse mais par contre 1 ou 2 conseil à te proposer qui devraient rendre ton code plus lisible et plus efficace:
- Remplace userform1 par Me
- Abuse des With...End With
- Indente ton code on y verra mieux les boucles
- Tu peux aussi améliorer ton code qui écrit dans les feuiles en utilisant des boucles en lieu et place de tes listes de cellules par exemple dans la proc CommandButton5_Click tu as en fin de sub

[Result!P2] = userform1.ComboBox12
[Result!Q2] = userform1.ComboBox13
...
[Result!AP2] = userform1.ComboBox38

Tu devrais le remplacer par une boucle du type (non testée):

j=16 '(pour commencer à P)
With Me
   For i=12 to 38
      Worksheets("Results").cells(2,j)= .controls("ComboBox" & i)
      j=j+1
   Next
End With

Encore désolé si je ne peux t'aider sur ton erreur mais je manque un peu de temps.

Bon courage

 

[skoobi]

Re : userform : combobox dépendate

Bonjour Jam,

tofoo a ouvert une nouvelle discussion ici en croyant bien faire...

 

[Jam]

Re : userform : combobox dépendate

Désolé...pour lui