Format Access Report Preview

Is there a method of forcing the Report Print preview in Access to format a particualr way? When I print preview reports the format is so small the report cannot be read. I understand that this can be changed. However some users are unfamiliar with the technique. Is there a way to make the font large enough to be read and change the size of the window every time preview is executed? Thanks.
StampITAsked:
Who is Participating?
 
peter57rConnect With a Mentor Commented:
You could put code into the report's Open event procedure...
 
docmd.Maximize
0
 
Jeffrey CoachmanMIS LiasonCommented:
<No Points wanted>

What version of Access you are using please?

On the code that Opens the Report you can also specify a specific Zoom level:

    DoCmd.OpenReport "YourReport", acViewPreview
    DoCmd.RunCommand acCmdZoom200 ' for 200% zoom

other examples:
    DoCmd.RunCommand acCmdZoom50 '50% zoom
    DoCmd.RunCommand acCmdZoom100 '100% zoom
    DoCmd.RunCommand acCmdZoom200 '200% zoom
...etc

But to be sure, Maximize the report first as Pete states:

Private Sub btnViewReport_Click()
    DoCmd.OpenReport "YourReport", acViewPreview
    DoCmd.Maximize
    DoCmd.RunCommand acCmdZoom200
End Sub

;-)

JeffCoachman



0
 
StampITAuthor Commented:
Jeff - Access 2007. Thanks for the tips.
0
Cloud Class® Course: CompTIA Cloud+

The CompTIA Cloud+ Basic training course will teach you about cloud concepts and models, data storage, networking, and network infrastructure.

 
Jeffrey CoachmanMIS LiasonCommented:
Great, again if this helps, then you can give all the points to Pete for posting the most popular way this issue is dealt with.

;-)

Jeff
0
 
StampITAuthor Commented:
Below is what I put in the OnClick event of the report. The preview result is 50% zoom and the window is not maximized. Am I doing something incorrect here?
Private Sub Report_Click()
    DoCmd.OpenReport "rptIVSHMoSum", acViewPreview
    DoCmd.Maximize
    DoCmd.RunCommand acCmdZoom100
End Sub

Thanks
0
 
Jeffrey CoachmanMIS LiasonCommented:
Put this code on whatever event "Opens"  the report... if you want this to be done: "every time preview is executed"
(...not on the OnClick event of the report itself...)
Again:

Private Sub btnViewReport_Click()
    DoCmd.OpenReport "YourReport", acViewPreview
    DoCmd.Maximize
    DoCmd.RunCommand acCmdZoom200
End Sub

Here: "btnViewReport"
...is the name of the button a user will click to preview the report.



0
 
StampITAuthor Commented:
Jeff - I got it. Thanks again for your help.
0
 
Jeffrey CoachmanMIS LiasonCommented:
;-)
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.