Bob Vance wrote:

Marshall I also have a Batch print report that is similar to my other
report, It just lets me print all Owners statements with out selecting
individual Owners
The problem here that it has a "group on OwnerID"
It also has an OwnerID Header and a OwnerID Footer with nothing in the
footer


I am having trouble finding time to set up a test for that
scenario. Rather than just leave you hanging I'll throw out
an idea that I would try first.

Start with a copy of the report you got to work earlier.
Then make all changes to the copy and, if we can get it to
work for this new report, I expect that you should be able
to use this new report for both scenarios.

Move the report footer stuff to your OwnerID group footer
and get rid of the report footer. Set this group footer
section's Name to OwnerFooter.

Add a second group with footer on the OwnerID field and set
this footer section's Name to Spacer. Move the code and
page break control we had in the =1 group in the other
report to this new group's footer. Get rid of the =1 group.

Change the code in the Spacer footer section to use thenew
section names instead of the generic names Access supplied:

Const TPI As Long = 1440
Const PAPERHEIGHT As Long = 11 * TPI
Const BOTTOMMARGIN As Long = 0.5 * TPI

Private Sub GroupFooter1_Format(Cancel As Integer,
FormatCount As Integer)
Dim FooterTop As Long
FooterTop = PAPERHEIGHT - BOTTOMMARGIN _
- Me.OwnerFooter.Height
If Me.Top = FooterTop Then
Me.pgEject.Visible = True
Else
Me.pgEject.Visible = False
Me.Spacer.Height = FooterTop - Me.Top
End If
End Sub

--
Marsh
MVP [MS Access]