Print preview zoom 100 doesn't work

[laavista]

I'm using Access 2003.

I'm trying to preview reports at 100%, but the reports are opening at "fit"
(and you need a major magnifying glass to read them!).

I have a list of reports, and when the user selects a report, the following
code is executed. Everything works--if the preview button is clicked, I get
the preview. If the preview button is not clicked, it prints. I just need
the preview report to be at 100%.

The code:
DoCmd.OpenReport Me.lstReport, IIF(Me.chkPreview.Value, acViewPreview,
acCmdZoom100)

Any suggestions would be greatly appreciated!

 

[fredg]

I'm using Access 2003.

I'm trying to preview reports at 100%, but the reports are opening at "fit"
(and you need a major magnifying glass to read them!).

I have a list of reports, and when the user selects a report, the following
code is executed. Everything works--if the preview button is clicked, I get
the preview. If the preview button is not clicked, it prints. I just need
the preview report to be at 100%.

The code:
DoCmd.OpenReport Me.lstReport, IIF(Me.chkPreview.Value, acViewPreview,
acCmdZoom100)

Any suggestions would be greatly appreciated!

The Preview Button is a check box? Or what?
If a Check Box:

DoCmd.OpenReport Me.lstReport, IIf(Me.CheckBoxName = True, acPreview,
acNormal)
If Me.CheckBoxName = True Then
DoCmd.RunCommand acCmdZoom100
End If

If "or what?" then you'll need to adapt the above code to whatever
value the Preview button returns.

 

[laavista]

This worked like a charm. THANK YOU for taking the time to help me with this!!