Message "erreur d'exécution 9"

Résolu/Fermé
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023 - 30 déc. 2021 à 15:15
f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024 - 31 déc. 2021 à 17:33
Bonjour Chers tous,

j'essaie d'exécuter le code du fichier ci-desssous

https://cjoint.com/c/KLEod0yDPaZ (est un fichier .frm)

à partir du classeur dont le lien est le suivant

https://cjoint.com/c/KLEn1qtQQLZ

Malheureusement j'ai le message d'erreur

"erreur d'exécution '9', l'indice n'appartient à la sélection"

Pouvez vous m'aider à résoudre ce problème svp ?

Merci de votre aide
A voir également:

9 réponses

yg_be Messages postés 22793 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mai 2024 1 467
30 déc. 2021 à 15:35
bonjour,
que fais-tu, à partir de ces deux fichiers, pour obtenir cette erreur?
1
f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024 1 705
31 déc. 2021 à 15:14
Bonjour a vous deux et meilleur voeux

C'est votre histoire de .frm qui m'a intrigue.
En principe ces fichiers sont pour du VB5.0 ou VB6.0 qui n'a rien a voir avec du VBA


Pour votre erreur 9, normal, il n'y a aucun object tableau ou autre sur votre feuil2
1
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023
30 déc. 2021 à 15:40
Bonjour yg_be,

le premier lien est un formulaire d'enregistrement en VBA.
Le deuxième lien est le fichier Excel dans lequel les enregistrements doivent se faire.
0
yg_be Messages postés 22793 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mai 2024 1 467
30 déc. 2021 à 16:21
Quel logiciel utilises-tu pour ouvrir le premier fichier?
0
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023
30 déc. 2021 à 17:03
J'ouvre ce fichier à partir de visual basic d'Excel. J'utilise la commande "importer un fichier" à partir du volet gauche qui affiche le projet VBA ainsi que les fenêtres ayant l'extension .frm
0
yg_be Messages postés 22793 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mai 2024 1 467
30 déc. 2021 à 17:08
Et cette importation fonctionne bien?
Pourquoi ne partages-tu pas le fichier Excel après avoir importé?
Est-il possible qu'un fichier Formulaire.frx soit présent dans le même dossier?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023
30 déc. 2021 à 17:32
L'importation onctionne bien
je n'arrive à relier ce fichier .frm au classeur Excel.
Le code comporte du fichier .frm comporte une erreur que je n'arrive pas à résoudre (voir mon premier message).
0
yg_be Messages postés 22793 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mai 2024 1 467
30 déc. 2021 à 20:12
Ne peux-tu pas sauver le fichier xlsm après l'importation?

Un fichier Formulaire.frx est-il présent dans le même dossier?
0
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023
31 déc. 2021 à 14:09
Ci-dessous le lien du fichier xlsm complet avec le tout le code vba du formulaire:

https://cjoint.com/c/KLFnhuGHSRT

Cordialement /-
0
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023
31 déc. 2021 à 14:33
Désolé ! le lien précédent n'est pas le bon :(


Ci-dessous le lien correct du fichier xlsm complet avec le tout le code vba du formulaire:

https://cjoint.com/c/KLFnuGSNnLT

Cordialement /-
0
yg_be Messages postés 22793 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mai 2024 1 467
31 déc. 2021 à 14:38
Et comment provoquer le message d'erreur?
0
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023
31 déc. 2021 à 14:45
- Démarrer l'application VBA d'Excel,
- Exécuter la fenêtre
- Faites un enregistrement
- Cliquer sur "AJOUTER"

Si tout se passe bien, il y aura un message d'erreur
0
yg_be Messages postés 22793 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mai 2024 1 467
31 déc. 2021 à 15:13
Le message d'erreur se produit sur la ligne:
Sheets(2).ListObjects(1).ListRows.Add

Je pense que cette ligne se sert à rien, et je suggère de la supprimer.
Je suggère aussi de modifier la ligne suivante, et d'y ajouter "+1", ainsi:
DL = Sheets(2).Range("b9999").End(xlUp).Row+1
1
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023 > yg_be Messages postés 22793 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mai 2024
31 déc. 2021 à 15:39
Merci ,
ça a marché :)

Bizarre, d'habitude cette ligne ne pose aucun problème et pourtant ? :(
0
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023 > yg_be Messages postés 22793 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mai 2024
31 déc. 2021 à 15:47
le code marche mais après la colonne "Statut" rien ne se passe :(
0
yg_be Messages postés 22793 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mai 2024 1 467 > jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023
31 déc. 2021 à 16:56
D'habitude?
0
yg_be Messages postés 22793 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mai 2024 1 467 > jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023
31 déc. 2021 à 16:59
Quelle partie du code devrait faire quoi après la colonne "Status"?
0
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023
Modifié le 31 déc. 2021 à 15:32
Bah, moi j'ai enregistré le formulaire VBA avec une extension .frm.

En revanche, j'ai du mal à comprendre " il n'y a aucun object tableau ou autre sur votre feuil2". Pourriez-vous donner plus de détails f894009 ?
0
f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024 1 705
Modifié le 31 déc. 2021 à 17:13
Re,

Sheets(2).ListObjects(1).ListRows.Add

Dans votre code, cette ligne permettrait d'ajouter une ligne a un tableau s'il y a en avait un et un seul. Autrement il faudrait mettre le nom du tableau
exemple:
Sheets(2).ListObjects("nom du tableau").ListRows.Add


Dans la feuille Order vous avez le tableau Tableau2 et dans la feuille Supplier vous avez Tableau1
0
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023 > f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024
31 déc. 2021 à 17:14
Ah d'accord :)
0
jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023 > f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024
31 déc. 2021 à 17:22
Mais pourquoi tu ne l'as pas dit plutôt !

Merci beaucoup!!! C'était ça le problème !
0
f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024 1 705 > jus2mandarine Messages postés 220 Date d'inscription vendredi 5 juin 2015 Statut Membre Dernière intervention 1 décembre 2023
31 déc. 2021 à 17:33
Re,

tu ne l'as pas dit plutôt !
Ben si post <13>
0