Discussion :

[KrusK]

Bonjour,

Je développe une application qui me génère des .doc (avec Word) et les imprime. En fait, je les génère, je les sauvegarde en local, j'ouvre les fichiers que j'ai créé, je les imrpime, puis je les ferme (c'est surement pas le plus simple, mais j'ai pas réussi à faire autrement).

J'ai testé sur la machine sur la quelle j'ai développé l'application, ca fonctionne.

J'ai compilé le projet, installé sur un autre PC, et là, forcément, ca marche plus... Windows plante à cette ligne de code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
App.ActiveDocument.SaveAs "fichier.doc"

et me renvoit le célèbre message d'erreur Windows

Truc.exe a rencontré un problème et doit fermer. Nous vous prions de nous excuser pour le désagrément encouru.

Le souci, c'est que je n'ai pas la même version de Word sur les deux PC (2003 sur poste dev, 2000 sur poste client). Est ce que vous pensez que ca vient de là ? (Parce que à ce moment là, pourquoi je n'ai pas eu l'erreur avant dans le code, lorsque je créé mes fichiers doc).
Si oui, comment faire pour importer les références de projet vers d'autres versions de Word ?

[SfJ5Rpw8]

quel est ton systéme d'exploitation..?
une autre piste pourrai être le droit d'écriture d eton fichier.doc... essai de préciser un chemin qui existe et ou tu as les droits en écriture ... histoire d'effacer cette hypotése...

[marsup54]

Je crois que j'ai peut-être la la solution !

J'ai eu un problème similaire avec des versions différentes d'office : en fait, il est préférable d'utiliser une liaison tardive, plutôt qu'une liaison anticipée !!!!

1 ) Liaison anticipée

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
'Déclaration d'un nouvel objet word application
Dim wdApp As New Word.Application
...

Cette méthode charge l'objet en mémoire avant même son utilisation.
C'est en utilisant cette méthode que j'ai eu des problèmes en fonction des versions d'office.

2) Liaison tardive

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim wdApp As Object
Set wdApp = CreateObject("Word.Application")
...

Voilà, j'espère répondre à ton problème

[KrusK]

Youhou, merci marsup54, effectivement ca marche bien comme tu as dit, j'aurai jamais trouvé ca !

[marsup54]

Content de résoudre ton problème !
J'avais passé à l'époque un sacré bout de temps à résoudre ce problème ...

A charge de revanche.

++