Locking zoom % on Report Preview

[JohnD]

Every time a report is opened, it displays the page at 100% - thus allowing you to view a small portion of the document.

Is there a way to lock the zoom at 75% to view the overall page upon opening the report?

Thanks,

John D

 

[ghudson]

Searching the forum is a great way to discover and learn the answers to your Access programming questions. This might do what you want...

       DoCmd.OpenReport "YourReport", acViewPreview
       DoCmd.Maximize
       'DoCmd.RunCommand acCmdPreviewOnePage 'full page
       DoCmd.RunCommand acCmdZoom75 '75%

 

[JohnD]

Perfect, I made only a small change that worked out great

Private Sub cmdOpenReport_Click()
    If Me.Filter = "" Then
        msgbox "This preview is record specific, apply a filter before proceeding"
    Else
        DoCmd.OpenReport "Newptd", A_PREVIEW, , Me.Filter
        DoCmd.RunCommand acCmdFitToWindow
    End If
End Sub

.....and yes, I found it on search after you mentioned it

John D