Enregistrement d'une feuille à partir d'une cellule

Dim76 -  
Normad Messages postés 112 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je souhaiterais enregistrer une feuille d'excel 2013 dans le dossier correspondant au nom de la cellule C16, sachant que ce dossier est déjà créer.

ex : chemin =C:\Users\Dupont\Desktop\Nouveau dossier\C16

Merci de votre aide

Cordialement




1 réponse

Normad Messages postés 112 Date d'inscription   Statut Membre Dernière intervention   40
 
Sub Save()
    Dim NomFichier As String
    NomFichier = "C:\Users\Dupont\Desktop\Nouveau dossier\C16\" & Range("C16").Value & ".xls"
    ActiveWorkbook.SaveAs Filename:=NomFichier
End Sub
0