Macro d enregistrement

Résolu
manoelinho Messages postés 46 Statut Membre -  
eljojo_e Messages postés 1255 Statut Membre -
Bonjour,

J'aimerai savoir si il est possible de passer une macro qui me permettrai d enregister un fichier avec la valeur qui est inserée dans une cellule.

En effet j'ai des fichiers client et j'aimerais passer une macro qui me permettrait d enregister ce fichier client avec le nom qui figue dans la cellule E5 "nom client".

merci par avance de votre aide

1 réponse

  1. eljojo_e Messages postés 1255 Statut Membre 155
     
    Sub enregistree()

    a = Application.GetSaveAsFilename(Sheets("master").Range("E5").Value & ".xls", , , "Enregistrer la fiche client :")
    ActiveWorkbook.SaveAs Filename:=a

    End Sub
    0