J'ai actuellement ce module
 
ActiveSheet.Copy
    ChDrive "C"
    ChDir "C:\ajeter\"
    Nom = Range("Facture!L1" )
    Application.Dialogs(xlDialogSaveAs).Show Nom
 
Losrque j'enregistre, la macro me demande de valider.
J'aimerai qu'il le valide tout seul.
 
Pouvez vous m'aider ?
 
Merci