Moving to bookmark in Word 2007 template opened from Access 2007

I want to open a Word template from Access and then navigate to a bookmark.  I can open the template just fine and I can use things like .TypeText Text:="This is a test", but it will not navigate to a bookmark.  If I do a count bookmarks (X = ActiveDocument.Bookmarks.Count) if will return 0 even though if you go to the Word document that is opened by Access and open bookmarks it will show the bookmark I am trying to navigate to (and if I click it it will go to the bookmark just fine).
I have enabled macros in the template. I have also tried variants of the command line I use to .Goto what, but without making a difference.  Also tried the MoveUp command to see if that would work and it did not.
Another strange thing is I can open a template document, but if I try to open an existing document using
appWord.Documents.Open FileName:="C:\Users\Michael\Documents\testaccessworddoc.docx" it will not open the document (just keeps the Word instance open)
With appWord.Documents.Add(Template:="c:\Users\Michael\Documents\testaccessworddoc.dotx")
    End With
 
    With appWord.Selection
 
        Selection.GoTo What:=wdGoToBookmark, Name:="clientname"
        appWord.Selection.MoveUp wdline, 6
    End With

Open in new window

databasefunAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

tbsgadiCommented:
Hi databasefun,

Should be

With appWord.Selection
.GoTo What:=wdGoToBookmark, Name:="clientname"

Good Luck!

Gary
0
databasefunAuthor Commented:
I have already tried that as well and the cursor just stays at the beginning of the document
0
databasefunAuthor Commented:
Found a workaround.  If I use the following it fills in the bookmark just fine.

    Dim appWord As Object
    Set appWord = GetObject(, "Word.Application")

    If Err Then
            Err.Clear
            Set appWord = CreateObject("Word.Application")
             If Err Then
                  MsgBox "Can't start Word!"
                   Exit Sub
             End If
             appWord.Visible = True
      End If

appWord.Documents.Open ("C:\Users\Michael\Documents\testaccessworddoc.dotx")

  With appWord.activedocument.bookmarks
  .Item("clientname").range.Text = "Why me"
  End With

If I use in the With structure the command
  .GoTo What:=wdGoToBookmark, Name:="clientname"

it will not navigate to the bookmark. The cursor just stays at the document top and if I start entering text it goes at the start of the document.

 
0
databasefunAuthor Commented:
Figured it out.

The Microsoft Word 12.0 Object Library was not checked.  Once checked things worked fine.
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
tbsgadiCommented:
Yup that would do it :>
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Microsoft Access

From novice to tech pro — start learning today.