XL 2021 VBA - importer des tableaux dans un fichier excel

[imadaddy]

Bonjour tout le monde,

J'ai besoin d'un grand coup de main sur un fichier excel. Je vous explique mon cas : j'ai des balances de plusieurs sociétés (1 fichier par société) que j'aimerais intégrer les unes derrières les autres dans un tableau. Actuellement, le fichier que je joins me permet de le faire sur une balance particulière c'est grâce à un internaute qui a fait tout le code VBA. Cependant, si je charge une balance différente (on l'appellera balance X car il y a plus de colonnes), la macro ne s'adapte pas à cette balance X.

Sauriez-vous ce que j'ai à changer sur le code VBA pour atteindre mon but svp ? Pour info, les balances se trouvent en feuille AD; ID; OD et sortent en format .xls.

Merci par avance pour votre aide.
Cordialement.

 

[imadaddy]

Ça se plante après
"mot trouvé en cellule $A$17" ?

Bonjour Fanch55,

En tout cas, il y a plus rien après cette dernière ligne dans le code d'exécution.

Merci pour ton aide.
Cordialement.

 

[imadaddy]

Nouveau classeur :

Bonjour Fanch55,

Il n'y a toujours rien qui se charge sur la feuille et reste vierge avec une seule ligne vide. Voici le message que j'ai :

La feuille Import a été nettoyée
Le classeur C:\Users\Downloads\OEX\OEX.xls a été ouvert

Traitement de la feuille Revue Analytique - OEX
On va chercher le terme "Livre" en partiel dans la colonne "A"
Terme trouvé en cellule $A$8, Livre($B$8)=OEX
On va chercher le mot exclusif "Compte" dans la colonne "A"
mot trouvé en cellule $A$17
Appel du create_Import pour $A$18:$T$2309
Objet requis

Merci encore pour ton aide.
Cordialement.

 

[fanch55]

Nouveau classeur avec des traces supplémentaires .

Spoiler: Nota

Je ne pourrai guère pousser les traces plus loin,
s'il y a encore des dysfonctionnements non trouvés car non prévus,
il sera nécessaire de fournir une copie du classeur incriminé
Pour ce faire et garder une confidentialité entre "quatre yeux" si vous n'arrivez pas à anonymiser celui-ci,
je vous fournirai une adresse mail dédié en message direct à laquelle vous pourrez m'envoyer le classeur .
Tout cela bien sûr si vous désirez continuer .

 

[imadaddy]

Nouveau classeur avec des traces supplémentaires .

Spoiler: Nota

Je ne pourrai guère pousser les traces plus loin,
s'il y a encore des dysfonctionnements non trouvés car non prévus,
il sera nécessaire de fournir une copie du classeur incriminé
Pour ce faire et garder une confidentialité entre "quatre yeux" si vous n'arrivez pas à anonymiser celui-ci,
je vous fournirai une adresse mail dédié en message direct à laquelle vous pourrez m'envoyer le classeur .
Tout cela bien sûr si vous désirez continuer .

Bonjour Fanch55,

ça ne fonctionne toujours moi. Je te joins un fichier anonymisé. Je te remercie encore pour ton aide. Du coup pour revenir à mon poste initial, le but est de reproduire le tableau en créant une colonne avec le nom du livre situé en B8, supprimer les colonnes C et D et les lignes 1 à 17. J'ai en général 7 à 10 fichiers à intégrer et j'aimerais bien qu'ils s'intègrent les uns à la suite des autres.

Merci FANCH55

 

[fanch55]

Bonjour Fanch55,

ça ne fonctionne toujours moi. Je te joins un fichier anonymisé. Je te remercie encore pour ton aide. Du coup pour revenir à mon poste initial, le but est de reproduire le tableau en créant une colonne avec le nom du livre situé en B8, supprimer les colonnes C et D et les lignes 1 à 17. J'ai en général 7 à 10 fichiers à intégrer et j'aimerais bien qu'ils s'intègrent les uns à la suite des autres.

Merci FANCH55

Classeur modifié et testé avec le classeur données fourni .

 

[imadaddy]

Classeur modifié et testé avec le classeur données fourni .

Bonjour Fanch55,

Cette fois-ci, ça fonctionne super bien. Je vais intégrer tous mes établissements et voir ce que ça donne.

Merci beaucoup pour ton aide.