Problème d'alimentation d'une combobox dans un userform Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
L
Lenidan
Nouveau venu
Nouveau venu
Messages : 6
Inscrit le : 23 mai 2019
Version d'Excel : 2010 FR

Message par Lenidan » 23 mai 2019, 22:28

Bonsoir à tous

Je me permets de vous solliciter car je me trouve dans une situation dont je ne parviens pas à me dépêtrer.
Je débute sur VBA et je ne peux écrire pour le moment que des codes simples ou me fier à des codes que je trouve sur des forums tel que celui-ci.

Dans le cadre de mon travail, je dois créer un tableau de bord qui tient compte de choix dont la saisie doit se faire via un UserForm.
J'ai deux blocs de choix (Région et Courriers) contenant chacun deux ComboBox dépendants :
Le ComboBox 1 doit me donner la liste de mes territoires
Le ComboBox 2 doit lui me donner la liste des agences pour le territoires choisi dans la ComboBox 1
Le ComboBox 3 doit me donner la liste de mes groupes de courriers
Le ComboBox 4 doit lui me donner la liste des codes courriers pour le groupe choisi dans la ComboBox 3
C'est le même principe que les listes déroulantes en cascade que je dois reproduire ici.

Ma liste de donnée se trouve dans l'onglet "TABLES" et comprend déjà toutes les informations nécessaires dans des listes de noms.

Mon problème vient du fait que je n'arrive pas à écrire un code viable pour mon projet, Mes ComboBox restent désespérément vides et je finis toujours sur une erreur "438 de méthode non gérée par l'objet" ou "d'incompatibilité de type 13" et je ne comprends ni pourquoi, ni ce que je devrai changer pour me débarrasser de ce problème. Mon échéance de rendu approchant à grand pas et ayant grillé mon dernier neurone dessus, je m'en remets à vous. ::(
TDB_Test.xlsb
(120.95 Kio) Téléchargé 7 fois
Je vous joins un fichier simplifié, merci d'avance pour votre aide !!!!
Avatar du membre
James007
Fanatique d'Excel
Fanatique d'Excel
Messages : 11'226
Appréciations reçues : 344
Inscrit le : 30 août 2014
Version d'Excel : 2007 EN

Message par James007 » 24 mai 2019, 06:19

Bonjour

:bv:

Je souhaite te prévenir ... qu'à beaucoup d'égards ... tu as déjà semé toutes les graines de tes futurs problèmes ...

Idéalement, tu devais reprendre tout ton projet à zéro ...

Cela dit, pour te mettre le pied à l'étrier ...
Private Sub UserForm_Initialize()
Dim i As Long
    For i = 19 To 64
        Menu_Parametres.CboxDT.AddItem Cells(i, 6).Value
    Next i
End Sub
En espèrant que cela t'aide
A+

:)

Quand on n’a qu’un marteau, tous les problèmes deviennent des clous…
Avatar du membre
James007
Fanatique d'Excel
Fanatique d'Excel
Messages : 11'226
Appréciations reçues : 344
Inscrit le : 30 août 2014
Version d'Excel : 2007 EN

Message par James007 » 25 mai 2019, 06:26

Bonjour,

Lorsque tu auras eu le temps de tester la macro ... il ne faut pas hésiter à faire part de tes commentaires ...
A+

:)

Quand on n’a qu’un marteau, tous les problèmes deviennent des clous…
Avatar du membre
thev
Membre impliqué
Membre impliqué
Messages : 2'299
Appréciations reçues : 182
Inscrit le : 13 juin 2016
Version d'Excel : 2013 FR 64 bits

Message par thev » 25 mai 2019, 18:13

Bonsoir,

Vous devez organiser correctement vos tables en utilisant si possible des tableaux structurés (Menu Insertion --> Bouton Tableau), ce qui en facilite la maintenance et le code.
Ci-joint exemple de réorganisation de vos tables (feuille Table2) et exemple de code avec utilisation de dictionnaires imbriqués.
TDB_Test1.xlsm
(174.35 Kio) Téléchargé 5 fois
L
Lenidan
Nouveau venu
Nouveau venu
Messages : 6
Inscrit le : 23 mai 2019
Version d'Excel : 2010 FR

Message par Lenidan » 29 mai 2019, 08:34

Merci infiniment pour vos réponses.

Navré de n'avoir pas répondu plus tôt mais j'ai du mettre ce dossier en suspens pour me concentrer sur une urgence.
Je me suis penché sur chacune de vos solutions et suivant vos conseils j'ai refais mes tables et magie tout fonctionne maintenant.

thev, ta solution avec les dictionnaires m'a plus qu'intéressé mais c'est encore un peu difficile pour moi, je vais prendre le temps de la décortiquer

James007, merci pour ton conseil somme tout drastique et pour ton code qui m'a remis le pied à l'étrier.

J'ai maintenant d'autres difficultés mais si cela devient insurmontable pour moi je ferai un autre post.

Merci encore !
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message