Msg box before printing

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I've got a database and to get a printed report you press a button in the
meny. It works just fine....but..... before the printinprocess starts I would
like to get a "pop-up" box that tells the user how many pages he/her need to
put in the printer. Meaning I would like Access to count how many posts to be
printed/how many labels there's room fore on one side.
It's mostly adresslabels so it would be nice if you know how many you need!
Is there a smart way to do this? It would be nice if someone can get me a
step-by-step information because it was a long time ago I did the database
and you know what happens if you don't work with a programme for a while?!
(You forget a lot!)
Thanks in advance!
Kajo
 
Kajo,

The following code should do it
Private Sub PageHeaderSection_Print(Cancel As Integer, PRINTCOUNT As Integer)
If Not boPagesShown Then
MsgBox Me.Pages & " pages."
boPagesShown = True
End If
End Sub

put this above the 'option explicit'
Private boPagesShown As Boolean

HTH

Peter.
 
Back
Top