Solved

suppressing page break on last item in group - access report

Posted on 2012-04-12
7
602 Views
Last Modified: 2012-04-13
Hi Experts:
I have a report with multiple breaks. For simplicity sake, I'll keep the question refined to three breaks:
Group Header
   Location Header
      Plan Header
      Plan Footer (new page)
   Location Footer (new page)
Group Footer  (Group totals > inserted page break > fancy page finalizing group)

My problem:  When the last Location comes in for the Group, I don't want a page break. I want the Group totals to appear directly under the location totals, then, the inserted page break will take care of printing the fancy page all by itself.  How do I prevent the final Location within the group from breaking a page?   Is there an event that the last Location will trigger that I can interrogate?  
e.g., If Location.Last_Record = true then
        else new page
Thanks,
Betty
0
Comment
Question by:cninghm
  • 4
  • 3
7 Comments
 
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 37838021
I believe there may be a simple solution...
Can you post a simple sample of the DB
Also note that using a Group called "Group" is confusing...

Sample database notes:
1. Back up your database(s).
2. Combine the front and back ends into one database file.
3. Remove any startup options, unless they are relevant to the issue.
4. Remove any records unless they are relevant to the issue.
5. Delete any objects that do not relate directly to the issue.
6. Remove any references to any "linked" files (files outside of the database, Images, OLE Files, ...etc)
7. Remove any references to any third party Active-x Controls (unless they are relevant to the issue)
8. Remove, obfuscate, encrypt, or otherwise disguise, any sensitive data.
9. Compile the code. (From the VBA code window, click: Debug-->Compile)
10. Run the compact/Repair utility.
11. Remove any Passwords and/or security.
12. If a form is involved in the issue, set the Modal and Popup properties to: No
    (Again, unless these properties are associated with the issue)
13. Post the explicit steps to replicate the issue.
14. Test the database before posting.

In other words, ...post a database that we can easily open and immediately see and/or troubleshoot the issue.
And if applicable, also include a clear graphical representation of the *Exact* results you are expecting, based on the sample data.

JeffCoachman
0
 
LVL 74

Accepted Solution

by:
Jeffrey Coachman earned 500 total points
ID: 37838133
Among some techniques is to count the number of records (In the entire report, or the group or, whatever) then use code to turn off the page break:

Private lngprvtRecCount As Long

Private Sub Report_Open(Cancel As Integer)
    'Get a count of all the records
    lngprvtRecCount = DCount("*", "Orders")
End Sub

Private Sub GroupFooter1_Format(Cancel As Integer, FormatCount As Integer)
    If Me.txtRecCount = lngprvtRecCount Then
        'No Page break
        Me.Section(6).ForceNewPage = 0
    Else
        'Page break, after section
        Me.Section(6).ForceNewPage = 2
    End If
End Sub



But again a sample would be a lot easier to work with...
0
 

Author Comment

by:cninghm
ID: 37838215
Jeff:
On the "Group" thing.  I agree, but it's an inherited nightmare and I have limited time (no time to re-design).

On the posting example, I cannot - confidentiality.
I'm working with users to convince them of alternative design in report.  Thought it might be something simple.  
I will keep your suggestion in mind and get back to  you.
Thanks,
Betty
0
The Eight Noble Truths of Backup and Recovery

How can IT departments tackle the challenges of a Big Data world? This white paper provides a roadmap to success and helps companies ensure that all their data is safe and secure, no matter if it resides on-premise with physical or virtual machines or in the cloud.

 
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 37838260
<On the posting example, I cannot - confidentiality.>
See steps 8.
I only need a database that *Replicates* the issue...
0
 

Author Closing Comment

by:cninghm
ID: 37842837
Jeff:
The users are ok with 3 blank lines between breaks instead of page break.  I accepted your solution since I believe it would work if they insisted on the break.  
Thanks,
Betty
0
 
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 37843315
ok

Enjoy the weekend
0
 

Author Comment

by:cninghm
ID: 37843512
You too, buddy!
0

Featured Post

Ransomware: The New Cyber Threat & How to Stop It

This infographic explains ransomware, type of malware that blocks access to your files or your systems and holds them hostage until a ransom is paid. It also examines the different types of ransomware and explains what you can do to thwart this sinister online threat.  

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I see at least one EE question a week that pertains to using temporary tables in MS Access.  But surprisingly, I was unable to find a single article devoted solely to this topic. I don’t intend to describe all of the uses of temporary tables in t…
It’s been over a month into 2017, and there is already a sophisticated Gmail phishing email making it rounds. New techniques and tactics, have given hackers a way to authentically impersonate your contacts.How it Works The attack works by targeti…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …

856 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question