Hi. I have a button that runs a report based on a query and then goes to Print Preview ready for printing labels.
The VBA is:
Private Sub Command81_Click()

    DoCmd.OpenReport "MemberMailingListByYearQR", acViewPreview
    DoCmd.RunCommand acCmdPreviewTwelvePages
    DoCmd.RunCommand acCmdZoom100

End Sub

The query asks for a year for the report and then it all runs fine. The problem is that if the message box asking for the year is cancelled - using the Cancel button or X - the vba throws up a debug window highlighting the first row of the sub.

Can anyone help me with what I'm doing wrong please. Many thanks.