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

Dupliquer 2 feuilles lier et faire un Macro

  • Initiateur de la discussion Initiateur de la discussion DrEssex
  • 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 !

D

DrEssex

Guest
Bonjour

Voilà mon problème:
Sous Excel j'ai plusieurs feuilles
Je chercher à creer un Macro afin de dupliquer 2 feuilles.
Elles se nomment "1P" et "2P".
Elles sont liées, par divers formules entre-elles, par exemple; tous ce qui écrit sur une cellule A:2 de la feuille 1P et reporter B:15 sur la feuille 2P.

les feuilles 1P et 2p sont des modèles lier par des reports.

Je veux une macro (bouton) qui duplique ces feuilles 1P, 2P (soit 1P(2) et 2P(2) en conservant les même reports (juste les noms des feuilles change) et aussi bien déverrouiller les protections pour quelles soient prête à l'emploi.

Je sais il existe une astuce avec la souris et Ctrl pour dupliquer les 2 feuilles associer; et cela marche.

Je voudrais créer, un bouton (Macro) pour automatiser cette fonction.

J'ai essayé avec la fonction enregistrer une macro et cela marche pas.

soit cela donne une erreur bug soit les feuilles dupliquer, ne sont plus liée

pour reprendre mon exemple.
A2 de la feuille 1P(2) ne reporte plus sur B15 de la feuille 2P(2).

Merci d'avance.
 

Pièces jointes

Re : Dupliquer 2 feuilles lier et faire un Macro

Oui en effet comme j'ai voulue simplifier le fichier , je n'avais pas vue que j'avais décalé mes colonnes de A à C...
mais le principe reste le même...

sinon
Sub Copie()
ActiveWorkbook.Sheets(Array("1P 2008", "2P 2008")).Copy after:=ActiveSheet
End Sub

marche superbe !! seule point noir c'est trouvé une ligne de commande pour les copie ainsi crée soient en dernier du classeur excel (sachant qu'il y a beaucoup de feuille (et elle varie ... dans ce fichier) )
 
Re : Dupliquer 2 feuilles lier et faire un Macro

Bonjour Dressex, Kjin

modifies peut être comme suit :

Code:
ActiveWorkbook.Sheets(Array("1P 2008", "2P 2008")).Copy after:=Sheets(Sheets.Count)

bonne jourrnée
@+
 
- 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

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…