Copier et renommer l'onglet actif

diabolo

XLDnaute Nouveau
Sheets(1).Select
Sheets(1).Copy
Copie la 1er feuille d'un classeur dans un nouveau classeur

Sheets('Feuill (2)').Name = 'Lundi'
Renomme l'onglet 'Feuill (2) en 'Lundi' sur le même classeur.

Sheets('Feuil1').Name = Sheets('Feuille X').Range('A1').value
Renomme 'Feuill1' en fonction de la valeur de la cellule A1 d'un onglet choisi.

Quel est la commande avec Sheets qui prend en compte l'onglet sélectionné, le copie et le renomme ?

J'ai essayé ActiveSheets mais cela n'active une feuille que si elle est nommée, ActiveSheets ('planning') par exemple.
Merci d'avance.
 

Discussions similaires

Statistiques des forums

Discussions
312 310
Messages
2 087 127
Membres
103 479
dernier inscrit
Compta