2030penn
asked on
Keep Group Footer with last detail record
Hi all, hope someone can help with an Access 2007 report. The problem I'm having is that if I have enough detail records in grouped report, the group footer will be printed on the following page with the group header. This is result is like the attached image.
Report Top/Bottom Margins = .5"
Report Header:
Height = 1.5"
Auto Height = No
Can Shrink/Grow = No
Keep Together = Yes
Force New Page = None
Page Header:
Height = .375"
Auto Height = No
Group Header:
Height = .9583"
Auto Height = No
Can Grow/Shrink = No
Keep Together = Yes
Repeat Section = Yes
Force New Page = None
Keep header and first detail together is turned on in the Group, Sort, and Total section
Detail:
Height = .2083"
Auto Height = No
Can Shrink/Grow = Now
Keep Together = Yes
Force New Page = None
Group Footer:
Height = .0416"
Auto Height = No
Can Shrink/Grow = No
Keep Together = Yes
Force New Page = None
Page Footer:
Height = .1667"
Auto Height = No
Report Footer:
Height = 2.2083"
Auto Height = No
Can Grow/Shrink = No
Keep Together = Yes
Force New Page = None
I was able to solve the issue by putting a page break at the top of the detail section and adding the following code in Detail_Format, a suggestion I found on the Internet.
If Report.Top + Me.infracFooter.Height > 10619 Then
Me.PageBreak1.Visible = True
Else
Me.PageBreak1.Visible = False
End If
Everything seems to work, but I arrived at the '10619' value by trial and error and can't test every permutaion of the report because it can be filtered by several criteria and each group may have a different number of detail records.
Is anyone familiar with this type of set up and if so, can you tell me how I can reliably calculate the correct value to replace '10619'? Or, is there a better way to do this?
If any additional information is needed, please let me know.
TIA
sample.png
Report Top/Bottom Margins = .5"
Report Header:
Height = 1.5"
Auto Height = No
Can Shrink/Grow = No
Keep Together = Yes
Force New Page = None
Page Header:
Height = .375"
Auto Height = No
Group Header:
Height = .9583"
Auto Height = No
Can Grow/Shrink = No
Keep Together = Yes
Repeat Section = Yes
Force New Page = None
Keep header and first detail together is turned on in the Group, Sort, and Total section
Detail:
Height = .2083"
Auto Height = No
Can Shrink/Grow = Now
Keep Together = Yes
Force New Page = None
Group Footer:
Height = .0416"
Auto Height = No
Can Shrink/Grow = No
Keep Together = Yes
Force New Page = None
Page Footer:
Height = .1667"
Auto Height = No
Report Footer:
Height = 2.2083"
Auto Height = No
Can Grow/Shrink = No
Keep Together = Yes
Force New Page = None
I was able to solve the issue by putting a page break at the top of the detail section and adding the following code in Detail_Format, a suggestion I found on the Internet.
If Report.Top + Me.infracFooter.Height > 10619 Then
Me.PageBreak1.Visible = True
Else
Me.PageBreak1.Visible = False
End If
Everything seems to work, but I arrived at the '10619' value by trial and error and can't test every permutaion of the report because it can be filtered by several criteria and each group may have a different number of detail records.
Is anyone familiar with this type of set up and if so, can you tell me how I can reliably calculate the correct value to replace '10619'? Or, is there a better way to do this?
If any additional information is needed, please let me know.
TIA
sample.png
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Hi Jim,
This works well; much better than trial and error, and hard coding heights. I really appreciate your assistance.
This works well; much better than trial and error, and hard coding heights. I really appreciate your assistance.
ASKER