USF ComboBox cascade

[jorge1201]

Bonjour le forum,

Je sollicite votre aide car j'essaie d'adapter un code (il me semble de Jacques Boisgontier) et je n'arrive pas.

Dans un classeur "FACTURATION", j'ai deux fichiers: Factures et CodesPostaux.

Dans la feuille de calcul "Clients" du fichier "Factures", je remplis les données du client à l'aide d'un UserForm. L'UserForm1 contient, entre autres, 2 ComboBox: ComboBoxCP et ComboBoxLieu. Ces deux ComboBox doivent extraire les infos du fichier CodesPostaux.

Le choix d'un code postal dans la ComboBoxCP doit me donner les choix possibles des lieux dans la ComboBoxLieu.

Cependant, lorsque je clic sur le bouton Ouvrir USF, j'obtiens une erreur d'exécution -2147217865(80040e37) où il est indiqué que

"Microsoft Pilote ODBC Excel, le moteur de base de données Microsoft Jet n'a pas pu trouver l'objet BD".
Le debogage souligne en jaune l'instruction "UserForm1.Show".

Je ne comprends pas ce message et je ne sais plus quoi faire.

Je précise que j'ai bien mis la référence ActiveX Data Objects 6.0 Library

Merci de votre aide.

 

[Bebere]

Re : USF ComboBox cascade

bonjour Jorge
il suffit de nommer BD les données de codes postaux
tu ouvres le fichier,tu sélectionnes les données
dans la fenêtre (1ère à gauche )tu sélectionnes A1 tu tapes BD et clic enter
enregistrer et fermer
à bientôt

 

[jorge1201]

Re : USF ComboBox cascade

Bonjour le forum, Bebere,

Merci pour ta réponse, c'était bien cela (autant pour moi, crasse faute d'inattention).

Sans vouloir abuser de ta disponibilité, quel serait le bout de code qu'il faudrait rajouter pour que la ComboBoxLieu s'ouvre automatiquement dès qu'un code postal a été sélectionné dans la ComboBoxCP?

En PJ, le fichier corrigé.

Merci d'avance.

 

[Bebere]

Re : USF ComboBox cascade

Bonjour Jorge
la requête est mise dans un tableau arr
ajout de code dans workbook_open de codespostaux pour BD
à bientôt

 

[jorge1201]

Re : USF ComboBox cascade

Bonsoir le forum, Bebere,

Merci pour ta réponse. J'ai regardé tes modifications et j'avoue n'a rien avoir compris. J'ai essayé de l'adapter à mon projet mais ça ne marche pas. En effet, j'ai un message d'erreur d'exécution : Le moteur de base de données Microsoft Jet n'a pas pu trouver l'objet C:\Windows\web\CodesPostaux.xls.

Pourrais-tu m'éclairer stp? Pourquoi ce chemin? Pourrais-tu mettre quelques commentaires dans le code pour si je pige?

Merci d'avance.

 

[Bebere]

Re : USF ComboBox cascade

bonjour Jorge
pour le chemin oubli ou erreur de ma part
mis quelques commentaires
le principe de la cascade(combobox) est le même qu'avant
à bientôt

 

[jorge1201]

Re : USF ComboBox cascade

Bonjour le forum, Bebere,
Merci pour ta réponse. Cette nouvelle version marche à la perfection.
Merci bcp et bonne journée.