Nom de fichier inclus dans la feuille

Bonjour,

Est-il possible d'enregistrer un fichier avec un nom qui est inclus dans une cellule. Je pense notamment concaténer un nom avec une date pour créer une copie de sauvegarde à la date du jour.

Merci.

Bonsoir,

Avec le nom Fichier en A1,

Sub Enreg_Fichier()
    Dim Chemin As String
    Dim NomFichier As String
    Chemin = ActiveWorkbook.Path
    NomFichier = Range("A1")
    ActiveWorkbook.SaveAs Filename:=Chemin & "\" & NomFichier
End Sub

amicalement

Claude.

Salut le forum

Le nom du fichier en A1, la date ajoutée automatiquement, aucun besoin de Dim

Sub Enreg_Fichier()
    ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.Path & "\" & Range("A1") & "_" & Format(Date, "yyyymmdd")
End Sub

Mytå

Merci beaucoups pour la rapidité, mais je suis un nerds sur exel et je ne sais pas comment utilisé le code, doit-je le copier dans une cellule ????

merci beaucoup de m'aider