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

  1. 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