Copier une feuille avant une autre

Bonjour à tous,

J'aimerais copier l'intégralité d'une feuille "Modèle" (créer une copie) avant une autre "Code" et cela peut importe le nombre de feuilles entre la feuille "Modèle" et la feuille "Code" (voir fichier ci-joint - Classeur 2.xlsm). Afin d'activer cette copie, il faudra faire "2 clics droits sur l'onglet "Modèle".

Si quelqu'un pourrait m'aider, cela serait fortement apprécié.

Merci à l'avance,

Salutations,

Renaud D.

12classeur-2.xlsm (8.23 Ko)

Bonjour,

clic droit sur l'onglet "modèle";

déplacer ou copier

dans la fenêtre qui s'ouvre, sélectionner "code" dansle champ "avant la feuille"

et penser à cocher "créer une copie"...

Du moins c'est comme ça sur excel 2003...

Bonjour,

J'ai oublié de préciser que je veux que cette opération soit entièrement automatisé par une programmation VBA.

Salutations,

Renaud D.

Bonjour

Option Explicit
Public Sub Copie_Modèle()
    Worksheets("Modèle").Copy before:=Worksheets("Code")
End Sub

Merci Jean-Eric pour ta réponse.

Y -a-t-il moyen de lancer l'instruction " Worksheets("Modèle").Copy before:=Worksheets("Code")" simplement avec un double-clic droit sur l'onglet "Modèle" ?

Merci à l'avance,

Salutations,

Renaud D.

Bonjour,

Tu dois éviter la solution double-click (procédure événementielle).

Penses plutôt à une solution du type : Ctrl+w pour lancer la procédure.

Voir fichier.

Cdlt

13classeur-2.xlsm (15.16 Ko)

Merci Jean-Eric pour ta réponse,

Ton aide fut fort apprécié.

Salutations,

Renaud D.

Rechercher des sujets similaires à "copier feuille"