fFindBookmark()...

This function opens the specifed Word document to the specifed Bookmark from Access.  To use... Call fFindBookMark("WordDocumentName", "BookmarkName").
The difficult I do immediately, the impossible takes a little bit longer.
Function fFindBookMark(strDocName As String, strBookmark As String)
 
    Dim oWord As Object
 
   'Start Microsoft Word and open the document
   Set oWord = CreateObject("Word.Application")
   oWord.Documents.Open strDocName
   oWord.Visible = True
 
   'Find the bookmark
   oWord.ActiveDocument.Bookmarks(strBookmark).Select
   oWord.Activate
 
End Function
VBA
Tips (Main)
Home
Creating a Multi-Value field using Alphabet
Copy Fields Down from above Record
Loop thru records and OutPutTo seperate .RTF or .PDF
Modified Spell Check
Code Snippets
Lock\Unlock Bound Controls
Loop while renumbering two columns
Create a Table with Dynamic Field Names
Snippets for Exporting to Excel
Log Field Changes
Log Record Deletions
Check for Duplicate Values
ValidateData()
ClearClipboard()
Selecting an Excel Worksheet from Access
Send eMail to Multiple Recipients
Cancel Save in a Bound Form
Automatically Send eMail Notifications
Looping Records to Send eMail
fxlFindReplace()
Needs error code!
This site uses cookies to collect data on usage. By continuing to browse this site you consent to this policy. Find out more here.