copie onglet

[al1000]

Bonjour,

j'ai fait une macro qui me recopie l'onglet N° 1 (qui est les plus à gauche sur l'ecran) vers la fin des onglets (ceci avec after ecrit dans la macro)

mais je voudrais que lorsque je recopie l'onglet n°1 il se glisse toujours en deuxième position (juste apres l'onglet n°1).


Comment faire ou comment ecrire la macro?


a+

 

[mromain]

Re : copie onglet

bonjour al1000

ce code permet de faire une copie de la première feuille en deuxième position

ThisWorkbook.Sheets(1).Copy after:=ThisWorkbook.Sheets(1)

ou encore

ThisWorkbook.Sheets(1).Copy before:=ThisWorkbook.Sheets(2)

a+

 

[Hulk]

Re : copie onglet

Hello Al1000, Mromain,

Peut-être encore mieux

ThisWorkbook.Sheets(1).Copy after:=Worksheets(Worksheets.Count)

De cette façon, quoiqu'il en soit, il placera la feuille en fin de liste.

Cdt, Hulk.