Renommer mon fichier comme son unique onglet en vba
Résolu
Emi80110
Messages postés
68
Date d'inscription
Statut
Membre
Dernière intervention
-
JCB40 Messages postés 3013 Date d'inscription Statut Membre Dernière intervention -
JCB40 Messages postés 3013 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai créé la macro ci-dessous qui me permet d'exporter un onglet dans un nouveau classeur que j'aimerai enregistrer dans le même dossier que son fichier d'origine, mais en le renommant sous le même nom que son onglet.
Ici j'avais mis provisoirement "DS" pour le nom de fichier le temps de créer la première partie de la macro. Mais je ne parviens pas a trouver le bon code pour remplacer DS par le nom de mon onglet.
Pouvez-vous m'aider svp ?
Par avance merci.
Sub Exporter()
Dim WbkDst As Workbook
ThisWorkbook.Sheets("1").Copy
Set WbkDst = ActiveWorkbook
WbkDst.SaveAs Filename:=ThisWorkbook.Path & "\DS.xlsx", _
FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
WbkDst.Close
End Sub
Windows / Edge 123.0.0.0
A voir également:
- Renommer mon fichier comme son unique onglet en vba
- Fichier bin - Guide
- Renommer fichier en masse - Guide
- Fichier epub - Guide
- Fichier rar - Guide
- Comment réduire la taille d'un fichier - Guide
