Discussion :

[mschistozis]

Bonjour

Je veux fusionner manuellement un fichier word depuis VBA access. J'ai inséré des signets dans mon fichier word et voici un extrait de mon code qui me semble pourtant juste :

Set wdapp = CreateObject("Word.application")
wdapp.Visible = True
wdapp.Documents.Open "C:\Documents and Settings\Administrateur\Bureau\qualité\testpublip.doc"

wdapp.ActiveDocument.Bookmarks("Nom").Range.Text = Nom.Value

J'ai inclus la bibliotheque "microsoft Word 10.0 Object library", mais la methode se semble pas reconnue.

Comment faire ??

[argyronet]

Bonjour,

D'où vient Nom.Value?

Argy

[mschistozis]

c le nom d'un champ de mon formulaire, lié à une table.

[Maxence HUBICHE]

Set wdapp = CreateObject("Word.application")
wdapp.Visible = True
set wddoc=wdapp.Documents.Open ("C:\Documents and Settings\Administrateur\Bureau\qualité\testpublip.doc")

wddoc.Bookmarks("Nom").Range.Text = Nom.Value

serait beaucoup plus agréable

J'ai inclus la bibliotheque "microsoft Word 10.0 Object library", mais la methode se semble pas reconnue.

Vu que tu fais du createObject... la librairie, il s'en fout. On dirait que tu fais du LateBinding, donc, quelque part, la bibliothèque, iln'en a rien à battre !
Par contre, quand il te dit que l'élément de la collection n'existe pas, c'est qu'il faut que tu regardes dans les collections que tu attaques. Il n'y en a qu'une : Bookmarks. Donc, cela signifie que, dans le document que tu attaques, il n'y a pas de Bookmark ayant 'Nom' comme nom... va donc vérifier

[mschistozis]

Parfait !!!

Génial ton indication et les explications qui vont avec !!
Mon problème venait effectivement des bookmarks dans word

Merci !!