Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

VBA : copier une feuille dans plusieurs classeurs différent

  • Initiateur de la discussion Initiateur de la discussion Amethyste69
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

A

Amethyste69

Guest
Bonjour

Je voudrais insérer des feuilles du classeur B dans un classeur A. J'ouvre le classeur B et j'insère les feuilles dans le classeur A. J'ai donc la macro suivante

Workbooks.Open Filename:= _
"D:\User\Doc\B.xls"
Sheets(Array("Suivi - Relevés", "Suivi - Calculs", "Suivi - Graphes")).Select
Sheets("Suivi - Graphes").Activate
Sheets(Array("Suivi - Relevés", "Suivi - Calculs", "Suivi - Graphes")).Move _
Before:=Workbooks("A.xls").Sheets(2)

Ici rien de bien compliqué sauf que je dois le faire pour plusieurs classeurs A mais de noms différents (donc A change tout le temps). Comment modifier la macro pour qu'il tienne compte de différents noms, ou qu'elle revienne au classeur d'origine sans le nommer.

Merci d'avance
 
Re : VBA : copier une feuille dans plusieurs classeurs différent

Bonjour Amethyste, et à ceux qui passeront par ici,

Fouille dans le Classeur joint et adapte à tes besoins.

Notamment une boucle sur tous les Classeurs concernés.

Amicalement.

Yann
 

Pièces jointes

Re : VBA : copier une feuille dans plusieurs classeurs différent

Bonjour Amethyste, et à ceux qui passeront par ici,

Fouille dans le Classeur joint et adapte à tes besoins.

Notamment une boucle sur tous les Classeurs concernés.

Amicalement.

Yann

Merci Yann. Cependant, je n'ai pas trouvé l'astuce pour copier 3 feuilles en même temps. De plus, ta macro ne copie systématiquement que le dernier de mon classeur source. Désolé, je suis débutant sous VBA.

Cordialement

Amethyste
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

C
Réponses
1
Affichages
1 K
Cattleya97
C
E
Réponses
8
Affichages
2 K
ebenezerkonan
E
K
Réponses
8
Affichages
2 K
kamal.elkakiri
K
C
Réponses
8
Affichages
2 K
Genii
G
S
Réponses
4
Affichages
2 K
stage_ferrit
S
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…