J
James
Any help appreciated.
Using Access 2000. I have used similar code successfully before, but
in this new app I am getting a compile error:
Qualifier must be collection.
Private Sub Command12_click()
' start Microsoft Word.
Set wordApp = CreateObject("Word.Application")
With wordApp
' Make the application visible.
.Visible = True
' Open the document.
.Documents.Open ("C:\DataLetters\NoticeToProceed.doc")
' Move to each bookmark and insert text from the form.
.ActiveDocument.Bookmarks("To").Select
.Selection.Text = (CStr(forms!NoticeToProceed!To))
<continued> ....
And the highlight is in the .Selection.Text line !NoticeToProceed!
Thanks in advance for any help.
James
Using Access 2000. I have used similar code successfully before, but
in this new app I am getting a compile error:
Qualifier must be collection.
Private Sub Command12_click()
' start Microsoft Word.
Set wordApp = CreateObject("Word.Application")
With wordApp
' Make the application visible.
.Visible = True
' Open the document.
.Documents.Open ("C:\DataLetters\NoticeToProceed.doc")
' Move to each bookmark and insert text from the form.
.ActiveDocument.Bookmarks("To").Select
.Selection.Text = (CStr(forms!NoticeToProceed!To))
<continued> ....
And the highlight is in the .Selection.Text line !NoticeToProceed!
Thanks in advance for any help.
James