enregistrer sous un nom différent à chaque fois

[Thierry]

Je souhaite écrire une macro permettant d'enregistrer un fichier sous le nom d'une des cellules du fichier (c'est le numéro de facture qui s'incrémente automatiquement)

Merci

 

[Gérard DEZAMIS]

Bonsoir Thierry

Dire bonjour lorsque l'on rentre à l'improviste chez une personne évite de se faire claquer la porte au nez (Comme disait Ândré il y a peu de temps ... à peu de chose près je crois)

Bon ... pour une fois ...

Essayer

Public Sub Sauvegarde()
Dim Nom As String
Nom = Range('A1').Value
ThisWorkbook.SaveCopyAs Filename:=Nom & '.xls'
End Sub

sera peut-être l'adopter ...

@+ GD

 

[Thierry]

Désolé !!!!

J'étais concentré sur la rédaction de la question
Merci pour cette réponse et surtout :
Bonjour aux utilisateurs de ce forum

Thierry (avec toutes mes excuses)

 

[selab]

Bonsoir ou bonjour tlm,

juste pour dire merci pour cette macro car justement je cherchais comment faire. ;-)

c'est impeccable.