Save As en Word avec variable

Question

Bonjour, 

J'aimerais savoir si en Word c'est possible de créer une macro "Save As" qui va m'énregistrer le fichier avec une référence qui se trouve dans le fichier et qui change.

Pour être plus explicite, j'ai une lettre que je dois modifier et en suite enregistrée. 
Pour chaque client j'ai un identifiant "LT123456" (toujours 2 lettres et 6 chiffres). 

J'ai crée la macro ci-desous mais c'est ok seulement si je veux enregistres toutes mes lettres sous le nom "Lettre.doc" acr elle ne tient pas compte de ma variable (l'identifiant).

Je vous remercie vivement.

Sub SaveAs()

ActiveDocument.SaveAs FileName:="Q:\Users\Cosmin\Lettre.doc" 

End Sub


Configuration: Windows 2003 / Internet Explorer 6.0

Utilisateur anonyme · Answer

Bonjour,

Quelque chose comme :


Sub SaveAs()

    Dim NomFichier As String
    Dim Identifiant As String
    
    Identifiant = "LT123456"
    
    NomFichier = "Q:\Users\Cosmin\" & "Lettre_" & Identifiant & ".doc"

    ActiveDocument.SaveAs Filename:=NomFichier
    
End Sub
'


Cdt

Lupin

Save As en Word avec variable

1 réponse

Discussions similaires

Newsletters