Insérer plusieurs feuilles identiques à une feuille

[Brigitte]

Bonjour,

Damned ! Je suis sûre d'avoir vu ca qq part... Insérer plusieurs feuilles identiques à une des feuilles d'un classeur (non vide)... on peut faire cela ?

Il me semble que lorsque l'on veut notamment faire un classeur sur les mois de l'année, on n'insère pas les feuilles de mois une par une...

J'ai cherché mais pô trouvé.

Merci à vous si vous avez la soluce. Bizzzzzzz

 

[Papou-net]

Re : Insérer plusieurs feuilles identiques à une feuille

Bonjour Brigitte,

Cette ligne copie la feuille 1 de ton classeur et la place en dernière position :

Sheets("Feuil1").Copy After:=Sheets(Sheets.Count)

Rien de plus facile que de l'insérer dans une boucle pour en insérer plusieurs copies.

Espérant avoir répondu.

Cordialement.

 

[tdenfert]

Re : Insérer plusieurs feuilles identiques à une feuille

C'est rigolo j'ai trouvé ça:

https://www.excel-downloads.com/threads/dupliquer-une-feuille-plusieurs-fois.63729/

 

[Pierrot93]

Re : Insérer plusieurs feuilles identiques à une feuille

Bonjour Brigitte🙂, Papou

si ta feuille est enregistrée en tant que modèle tu peux également procédé ainsi :

Worksheets.Add after:=Sheets(Sheets.Count), Count:=12, Type:= _
    "C:\Program Files\Microsoft Office\Templates\Monmodèle.xlt"

en l'état le "count" indique le nombre de feuilles insérées.... Après on peut boucler sur les 12 dernières pour les renommer...

bonne fin d'après midi
@+

Edition : bonjour tdenfert

 

[Brigitte]

Re : Insérer plusieurs feuilles identiques à une feuille

Bonjour la joyeuse troupe...

Ben, en fait, c'est sans "maquereau" que j'eusse voulu faire la chose.

ET trop drôle d'avoir retrouvé un post avec une astuce proposée par... moi, ca alors, j'étais plus maligne à l'époque... mon neurone s'est gâté.

Merci à vous en tout cas.

 

[chris]

Re : Insérer plusieurs feuilles identiques à une feuille

Bonjour à tous
Bise à Brigitte

Pensez aussi au glisser/déplacer avec CTRL qui est plus rapide que le clic droit et les choix dans le menu et marche aussi en multi sélection.

 

[Brigitte]

Re : Insérer plusieurs feuilles identiques à une feuille

Bonsoir everybody,

Super, ca marche nickel ton astuce, chris, merci...
Mon collègue Romuald devrait aimer ca.

Bonne soirée à vous tous et merci encore.