XL 2016 VBA: Copier des feuilles d'un fichier dans un autre

[Aloha]

Bonsoir,

J‘ai besoin d‘une aide en VBA.
Voici de quoi il s‘agit:
J‘ai 2 fichiers:
* le fichier source (fs): il contient 3 feuilles présentant la même structure.
Leur nom: AB, CD, EF
* le fichier destination (fd): il contient 3 feuilles: AB, EF et Modèle

La tâche: copier, feuille par feuille, les données du fs dans la feuille correspondante dans fd, dans la première ligne libre, en se basant sur la colonne A

Lorsqu‘il n‘y a pas encore dans fd une feuille correspondant à une feuille dans fs (dans le cas en espèce la feuille CD), il faut prendre la feuille Modèle, faire une feuille pour la feuille correpondante de fs, et lui donner le même nom que dans fs.

J‘ai enregistré une macro qui fait l‘opération, mais seulement pour une seule feuille de fs, à condition qu‘elle existe déjà dans fd. J‘ai besoin d‘une macro qui copie d’elle-même autant de feuilles qu‘il y en a dans fs.

Dans une deuxième étape il y a plus d‘un fs et fd et la macro doit copier du bon fs dans le bon fd.

L‘emplacement des fichiers (pour que la macro sache les trouver):
fs: D: Exemple:A copier
fd: D: Exemple:Fichiers destination

J‘espère m‘être exprimé d‘une façon compréhensible.

Bonne nuit
Aloha

 

[Aloha]

Bonjour,

un merci tardif!

J'ai un tout autre problème à présent.
J'ai fait tourner mon code avec succès dans un fichier temporaire.
Par contre, lorsque je le copie et que je le colle dans un module de mon fichier réel, j'ai un message d'erreur et je ne sais quoi faire pour corriger le problème.
Quelqu'un parmi vous aurait-il une idée?

Bonne journée
Aloha

 

[Aloha]

Rebonjour,

J'ai trouvé le problème et sa solution: une question de librairies.

Salve
Aloha