Free Lessons
Fast Tips
Topic Index
Home   Courses   Seminars   Templates   TechHelp   Fast Tips   Forums   Help   Contact   Join   Order   Logon  
Tips & Tricks

New Tips Added Weekly!
Click here to get on our Mailing List


Reset Page Numbering

How to Restart Page Numbering in an Access Report

Q: Is it possible to have page numbers restart at 1 in an Access report, depending on some field? For example, if I have a report with an employee section, with details about shifts worked. Each employee section may take up several pages. Can I have the page numbering start at one again every time the employee changes? > Greg B.

A: Yes, it's possible, but it's not easy to do. You think Microsoft would have made a feature like this a little more accessible. You need group levels and a little VBA source code to do it.

First, you'll need to group all of the same employee's records together using a Sorting & Grouping Level. Turn on the Group Header if you don't already see it. You don't need a Group Footer. You don't actually need to put any data in the Group level, but if you want to put the employee's name and info in there, that's fine too.

Now, add your page number textbox to the bottom of the page in the Page Footer section. I cover this in Access 104. You just need an unbound textbox with =Page in the Control Source.

Now, right-click on the FirstName Header section and select Build Event (code builder).

In the VBA section, enter:   Me.Page = 1

Also, make sure you set the "ForceNewPage" property for your Group Header to Before Group.

Now here's what happens... the pages will number themselves normally, but when a FirstName group header hits, the VBA code runs and sets the page numbering to 1. Then the next group section forces a new page, numbers accordingly, until the next section hits and resets the page number.

Again, it works... it's not easy to do... and I think Microsoft should have put a "reset page numbering" option in the properties for grouping levels, but that would make things too easy, and you wouldn't need to keep me around anymore.

:) LoL

Hope this helps.



By Richard Rost   Richard Rost on Twitter Richard Rost on LinkedIn Email Richard Rost
Click here to sign up for more FREE tips


Check out these other pages that may be of interest to you:

1/31/2023Group On Top
1/30/2023Association 8
1/27/2023Math in Fields
1/26/2023Association 7
1/25/2023Change Query
1/24/2023Association 6
1/23/2023Association 5
1/20/2023Association 4
1/19/2023Association 3
1/18/2023Association 2


The following is a paid advertisement
Computer Learning Zone is not responsible for any content shown or offers made by these ads.

Access - index
Excel - index
Word - index
Windows - index
PowerPoint - index
Photoshop - index
Visual Basic - index
ASP - index
My Account
My Courses
Lost Password
Student Databases
Change Email
Latest News
New Releases
User Forums
Topic Glossary
Tips & Tricks
Search The Site
Code Vault
Collapse Menus
Customer Support
Web Site Tour
Consulting Services
Affiliate Program
Richard Rost
Free Lessons
Mailing List
Video Tutorials
Learning Connection
Idiot's Guide to Excel
Volume Discounts
Payment Info
Terms of Sale
Contact Info
Support Policy
Mailing Address
Phone Number
Fax Number
Course Survey
Email Richard
[email protected]
Blog RSS Feed    Twitter

YouTube Channel    LinkedIn
Copyright 2023 by Computer Learning Zone, Amicron, and Richard Rost. All Rights Reserved. Current Time: 1/31/2023 10:28:47 PM.