Access - Interface W/Word Question

T

turner

I have written a "Help" file for my application. I got almost everything to
work. When the Word document opens in PrintPreview it displays the NUMBER of
pages that were last viewed by the user. I would like it to force it to
display just the ONE page that is relevent to the users problem.

Any Help would be appreciated!!!!

My Code is:

Public Function OpenHelp(stBookMark As String)
On Error GoTo err_OpenHelp

Dim objWord As Word.Document
Set objWord = GetObject("c:\Tc_Appl\UserHelp.doc", "Word.document")

objWord.Bookmarks(stBookMark).Select
objWord.Application.Visible = True
objWord.Application.WindowState = wdWindowStateMaximize
objWord.Application.ActiveDocument.PrintPreview

exit_OpenHelp:
Exit Function

err_OpenHelp:

Select Case Err.number
Case 287
MsgBox "A Copy of the 'Help' Document is already Open - Please,
Close It an Re-Submit"
Case Else
MsgBox Err.number & "-" & Err.Description
End Select

Resume exit_OpenHelp

End Function
 
C

Cindy M -WordMVP-

Hi =?Utf-8?B?dHVybmVy?=,
I have written a "Help" file for my application. I got almost everything to
work. When the Word document opens in PrintPreview it displays the NUMBER of
pages that were last viewed by the user. I would like it to force it to
display just the ONE page that is relevent to the users problem.
Try something like this

ActiveDocument.ActiveWindow.View.Zoom.PageColumns = 1
ActiveDocument.ActiveWindow.View.Zoom.PageRows = 1

Cindy Meister
INTER-Solutions, Switzerland
http://homepage.swissonline.ch/cindymeister (last update Jun 8 2004)
http://www.word.mvps.org

This reply is posted in the Newsgroup; please post any follow question or reply
in the newsgroup and not by e-mail :)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top