[WD-2007] Problème de sauvegarde de dotx en docx [Résolu]

[FtF Nemesis]

Bonjour à tous,

Voila j'ai un formulaire access qui m'ouvre une tramme word tramme.dotx, qui la modifie et qui sauvegarde un document.doc ou .docx. Les .doc fonctionnent parfaitement mais les .docx ne marche pas. A l'ouverture, word m'affiche "impossible d'ouvrir ...., des erreurs ont été décelé dans son contenu. Voici mon code :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Dim wordObj As Word.Application
Dim Tramme As Word.Document
Dim Name, dossier As String
 
dossier = "\\...local\....\Dossier_Essais\"
Name = Forms![frmWORD].Texte9.Value
 
Set wordObj = CreateObject("Word.Application") 'wordObj.Visible = True
Set Tramme = wordObj.Documents.Open(dossier & "rapport3.dotx")
 
Tramme.Bookmarks("Client").Range.Text =  Name
 
Tramme.SaveAs FileName:=dossier & Name & ".docx"
'Tramme.SaveAs FileName:=dossier & Name & ".doc"
 
wordObj.Quit savechanges:=False
 
Set wordObj = Nothing
Set Tramme = Nothing

Si quelqu'un sait pourquoi cela ne fonctionne pas avec les docx, je le remerci de me répondre.

hadrien

[carden752]

Bonjour,

Je pense que c'est le format de document qui ne correspond pas.
Pour moi, par défaut, la méthode saveas doit sauvegarder les fichiers au format ".doc".
Il faut donc lors de l'enregistrement lui dire que c'est du format docx.
Pour ce faire, il est possible de spécifier l'argument Fileformat avec une constante parmi celle défini dans wdsaveformat.

Sous Word 2007 pour les docx, essayes cela.

Code :

Tramme.SaveAs FileName:=dossier & Name & ".docx", Fileformat:=wdFormatDocumentDefault

[Heureux-oli]

Salut,

J'aurais une question en plus, quelle est ta version d'Access et de Word ?

[pgz]

Bonsoir.

Pour enregistrer en .docx, le fileformat est : wdFormatXMLDocument.

Cordialement,

PGZ

[Heureux-oli]

Salut,

Envoyé par pgz

Pour enregistrer en .docx, le fileformat est : wdFormatXMLDocument.

Es-tu certain que cette constante soit exploitable sous 2003 ?

[FtF Nemesis]

Merci pour vos réponses je vais essayé tout de suite, pour info ma version est 2007 pour Word et Access.

[FtF Nemesis]

Cette méthode fonctionne !!!

Code :

Trame.SaveAs FileName:=dossier & Name & ".docx", FileFormat:=wdFormatDocumentDefault

Merci encore

Hadrien

[carden752]

Bonjour,

Envoyé par Heureux-oli

Salut,

Pour enregistrer en .docx, le fileformat est : wdFormatXMLDocument.

Es-tu certain que cette constante soit exploitable sous 2003 ?

Cette constante n'est pas exploitable.
L'enregistreur de macro donne 100 pour le fileformat

[Heureux-oli]

Salut,

J'ai pas fait attention que la version était donnée.

Par contre, il est préférable d'utiliser la méthode Documents.Add au lieu de Documents.Open
On est alors certain de ne pas modifier le modèle de document.

[pgz]

Bonsoir

Envoyé par Heureux-oli

Salut,


Es-tu certain que cette constante soit exploitable sous 2003 ?

Le sujet est la sauvegarde en Docx, ce qui n'est pas envisageable je pense avec 2003 et la conversation est taguée en 2007.

PGZ