Salut le forum

J'ai essayé de réaliser un code via "Enregistrer macro" (voir code ci-dessous).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub Enreg()
'
' Enreg Macro
'
 
'
    Range("I45").Select
    ChDir "C:\"
    ActiveWorkbook.SaveAs Filename:="C:\essai.xlsm", FileFormat:= _
        xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
End Sub
Je souhaite que le nom du fichier soit la valeur d'une cellule.
Comment adapter mon code dans ce sens?
Merci