Printing 'continued' message in subreport

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have a report with several subreports. If any subreport is split between
pages of the main report, is there a way to repeat its header and print
'continued' after it. There is some code in each subreport now attempting to
do this but its not working, e.g.:

Private Sub GroupHeader0_Format(Cancel As Integer, FormatCount As Integer)
If Me.Parent.Page > 1 Then
[txtHeader] = "Updates: (continued)"
Else
[txtHeader] = "Updates:"
End If
End Sub
 
mscertified said:
I have a report with several subreports. If any subreport is split between
pages of the main report, is there a way to repeat its header and print
'continued' after it. There is some code in each subreport now attempting to
do this but its not working, e.g.:

Private Sub GroupHeader0_Format(Cancel As Integer, FormatCount As Integer)
If Me.Parent.Page > 1 Then
[txtHeader] = "Updates: (continued)"
Else
[txtHeader] = "Updates:"
End If
End Sub
Click to expand...


You will need a text box (named txtLine) in the detail
section. Set its control source expression to -1 and its
RunningSum property to Over group.

Also add am unbound text box (named txtPage) to the group
header section.

With that done, the code would look like this (air code):

If Me.txtLine = 1 Then
Me.txtHeader = "Updates:"
Else
Me.txtHeader = "Updates: (continued)"
End If
 
Back
Top