Link to home
Start Free TrialLog in
Avatar of StampIT
StampITFlag for United States of America

asked on

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.
ASKER CERTIFIED SOLUTION
Avatar of peter57r
peter57r
Flag of United Kingdom of Great Britain and Northern Ireland image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
<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



Avatar of StampIT

ASKER

Jeff - Access 2007. Thanks for the tips.
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
Avatar of StampIT

ASKER

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
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.



Avatar of StampIT

ASKER

Jeff - I got it. Thanks again for your help.