Need a simple bit of code for the OnOpen event on a Report

[LDG1234]

Hi guyz...

Need to display a message box with the number of pages for a report they know how many pieces of paper to load...

Thanks Lloyd Gozzett
Process Developer

 

[mph1]

Not sure where you would want this information, but you could use :
="Page " & [Page] & " of " & [Pages]
in a report footer and have the report set to preview first, then print.

HTH

Maurie

 

[WildHare]

The PAGES property (read only) contains the total number of pages in a report. So if you really wanted the user to know ahead of time how much paper to use, you can just pop up a message box:

Sub Report_Activate
msgbox "This report is " & me!Pages & " pages long. Please put enough paper in the printer." , vbOkonly
end sub


78.5% of all statistics are made up on the spot.
Another free Access forum:

http://www.forumco.com/jmhare

More Access stuff at

http://www.jmhare.com/wildhare2.htm

 

[LDG1234]

Thanks Wildhare

Only getting 0 each time I do this.

Any other hints please??? Lloyd Gozzett
Process Developer

 

[WildHare]

Hmm. We may need to find a "later" event. Try the PRINT event.

It's possible Access doesn't know how many pages there are until the first page starts printing..?? 78.5% of all statistics are made up on the spot.
Another free Access forum:

http://www.forumco.com/jmhare

More Access stuff at

http://www.jmhare.com/wildhare2.htm

 

[LDG1234]

Thanks for your help on this one.

I opened a recordset before I opened the report which displayed the recordcount in a message box and asked the user if they wanted to continue.

Works nicely but thanks for your input on this one.

Lloyd Gozzett
Process Developer