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

Renomer une nouvelle feuille...

C

Chris

Guest
Salut à tous, et encore merci à vous tous pour l'aide que vous m'apportez !!!

J'ai une autre question: Comment fait-on, pour renomer une feuille que l'on viens de créer, avant de la sauvegarder ???? voici mon code actuel :

--------------------------------------------------------------------------------------------
ActiveWorkbook.Sheets("of1").Copy ' copie de la feuille1 dans un nouveau classeur
ActiveWorkbook.SaveCopyAs chemin & Worksheets("of1").Range("b2").Value & ".xls"
ActiveWorkbook.Close

Unload UserForm2
Application.DisplayAlerts = False
Call QUIT

----------------------------------------------------------------------------------------

Je souhaiterai sauvegarder la feuille OF1 sous l'onglet RESUME ....

Merci de votre aide.

Chris
 
M

michel

Guest
bonsoir Chris

tu peux tester

ActiveWorkbook.Sheets("of1").Copy ' copie de la feuille1 dans un nouveau classeur
ActiveSheet.Name = "RESUME"
ActiveWorkbook.SaveCopyAs chemin & Worksheets("of1").Range("b2").Value & ".xls"
ActiveWorkbook.Close
.....

bonne soirée
michel
 

Discussions similaires

Réponses
8
Affichages
801
Réponses
13
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…