Sauvegarde fichier word en c/temp

Bonjour,

Je complète un fichier word à partir d’un fichier excel source

Les signets me permettent de compléter le fichier en automatique.

Le fichier word étant protégé (mot de passe « cedric »), j’aimerai que le fichier word soit sauvegardé en « c/temp » à la fin de la procédure – une fois complétée par la macro

Puis que le fichier word source se ferme sans sauvegarde afin de garder les signets vides

Le code que j’ai mis ne fonctionne pas.

Chemin = "c:\temp\"

NomFich = "avenant"

DocPath = Chemin & NomFichier

DocWord.SaveAs Filename:=DocPath, FileFormat:=wdFormatXMLDocument

Pourriez-vous également m’aider ?

le but étant qu’un mail parte ensuite avec le document word en copie donc j’irai le récupérer dans le « c/temp »

Voici le lien vers les fichiers :

Merci d’avance

cédric

Bonjour cédric,

à tester,

DocWord.SaveAs2 FileName:=DocPath & ".docx", FileFormat:= wdFormatXMLDocument

Hello,

Merci pour la réponse malheureusement cela ne fonctionne pas pour l'instant

Chemin = "c:\temp\"

NomFich = "avenant"

DocPath = Chemin & NomFichier

DocWord.SaveAs2 Filename:=DocPath & ".docx", FileFormat:=wdFormatXMLDocument

Merci pour ton aide encore une fois si tu as une idée.

Cédric

pitochico a écrit :

Merci pour la réponse malheureusement cela ne fonctionne pas pour l'instant

est ce qu'il y a un message d'erreur ?

Bonjour,

Finalement, en modifiant le code cela fonctionne maintenant

'// sauvegarde document dans répertoire temporaire

chemin = Environ("tmp") & "\"

nom = "avenant"

docpath = chemin & nom

WordDoc.SaveAs2 Filename:=docpath, FileFormat:=wdFormatXMLDocument

J'avais une autre question sur le sujet du fichier Word et quelqu'un a corrigé en même temps.

Merci en tout cas pour ton aide.

Je clos le post.

Merci et bonne journée.

Cédric