executing a word vba code from access

[snaggy^^]

I need to create a vba macro in access 2007 that opens a word 2007 document,
fills in the correct data from an access record (just one, not recursive) and
print it out.

I thought to open a document with symbols where I want to fill in data (like
<<1>> <<2>> etc), and the use find and replace to do it.
here's what I wrote:

Set objWord = CreateObject("Word.Application")
objWord.Documents.Open ("c:\Liquid\template.docx")
objWord.Visible = True
With objWord
..Selection.Find.ClearFormatting
.Selection.Find.Replacement.ClearFormatting
With .Selection.Find
.Text = "<<1>>"
.Replacement.Text = "something"
.MatchCase = True
End With
.Selection.Find.Execute Replace:=wdReplaceAll
End With

it does open the file and select the first occurrence to replace, but then
nothing happens!
Why?

bye and thank you all

 

[Shauna Kelly]

Hi

Your code searches for <<1>> and replaces that with "something". It then
stops. What else did you need it to do?

The following has an example of how to place data in bookmarks. That
technique may be helpful.
http://www.word.mvps.org/FAQs/Userforms/CreateAUserForm.htm

Hope this helps

Shauna Kelly. Microsoft MVP.
http://www.shaunakelly.com/word

 

[snaggy^^]

The point is that it doesn't work! It doesn't replace the instances of <<1>>
whene executed from access, while when it's executed from word it works.

bye

 

[snaggy^^]

Another thing..

How can I tell him to work on a specific file? Look at this:

Set objDoc as CreateObject("Word.Application.Documents.Open("path")")

shouldn't it work? whith nested quotes written like Chr(34)?

Or should I use ActiveDocument (i tried of course, but it gives me a
debugging error)

bye

 

[Doug Robbins - Word MVP]

Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Open("c:\Liquid\template.docx")


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

 

[snaggy^^]

I read your bookmark tutorial and loved it! It solves my problem in a great
way! It works perfectly

bye and thanks