E
Evert
Hi,
I am trying to print just the one sheet of the report that I have set up.
With help form the user group I'm able to only show the current record on
the form the report comes from. Unfortunately I'm not able to print as
advertised. here is the code:
Private Sub cmdPrint_Click()
DoCmd.OpenReport "rptAlertNotification", acViewPreview
DoCmd.OpenReport "rptAlertNotification", acViewNormal
Reports![rptAlertNotification].Filter = "LPN=" & Me.[tbQADATA.LPN]
Reports![rptAlertNotification].FilterOn = True
DoCmd.Close acForm, "frmALERT"
End Sub
I have added the second and fifth line. the second one to Print and the
fitfth one to close the form the report is based on.
It showss teh current record form the form however, it also does print 28
pages of reports.
How can I modify the code so that I can only print get the current record? I
have tried a macro but it does the same thing. (print 28 pages).
BTW my form is based on a query.
ANY help will be appreciated.
Evert
I am trying to print just the one sheet of the report that I have set up.
With help form the user group I'm able to only show the current record on
the form the report comes from. Unfortunately I'm not able to print as
advertised. here is the code:
Private Sub cmdPrint_Click()
DoCmd.OpenReport "rptAlertNotification", acViewPreview
DoCmd.OpenReport "rptAlertNotification", acViewNormal
Reports![rptAlertNotification].Filter = "LPN=" & Me.[tbQADATA.LPN]
Reports![rptAlertNotification].FilterOn = True
DoCmd.Close acForm, "frmALERT"
End Sub
I have added the second and fifth line. the second one to Print and the
fitfth one to close the form the report is based on.
It showss teh current record form the form however, it also does print 28
pages of reports.
How can I modify the code so that I can only print get the current record? I
have tried a macro but it does the same thing. (print 28 pages).
BTW my form is based on a query.
ANY help will be appreciated.
Evert