Group Header Won't Repeat on Next Page

[MochaLatte]

Group Header Won't Repeat on Next Page even when Properties set to "RepeatSection" = "Yes".
Any help will be greatly appreciated!!

 

[dhookom]

Is the group header in the main report or a subreport?

Are you using the Print Preview mode?

Duane
Hook'D on Access
MS Access MVP

 

[MochaLatte]

Thanks Duane! The group header is on the main report, and I am force to use Print Preview because the report needs to be exported to PDF.

 

[dhookom]

Do you have any code that hides the header?

Duane
Hook'D on Access
MS Access MVP

 

[MochaLatte]

Yes; the code hidden you suggested on a previous post to conditionally hides the group if blank. (it works great hiding the section)

Private Sub GroupHeader2_Format(Cancel As Integer, FormatCount As Integer)
Cancel = (Me.TxtNumEnc < 1)

End Sub

 

[dhookom]

Ok, is that code hiding the group header you are expected to see?

Duane
Hook'D on Access
MS Access MVP

 

[MochaLatte]

This is the code hiding the group header if specific field is blank.
Private Sub GroupHeader2_Format(Cancel As Integer, FormatCount As Integer)
Cancel = (Me.TxtNumEnc < 1)

When the cell is not blank; then, I am expecting this group header to be displayed and carry forward to the next page if group information moves to the next page.
Thanks for all your help!

 

[dhookom]

Basic trouble-shooting would be to comment out the code to see if the group information displays on the next page.

Duane
Hook'D on Access
MS Access MVP

 

[MochaLatte]

Following your advice, I commented the code and the Group Header is performing as expected (Repeat on each page)
Do you have an idea how to create a event condition on VBA?

If condition_1 Then
result_1
ElseIf condition_2 Then
result_2

I am not sure if this is correct:
If (Me.TxtNumEnc < 1) Then
Cancel = (Me.TxtNumEnc < 1)
ElseIf (Me.TxtNumEnc >= 1) Then
GroupHeader2.Visible True
End If

Thanks!!!!

 

[MochaLatte]

I just tried the code below and these are the results:
- The code hides Group Header 2 when the count is less than 1 (great)
- Group Header 2 is not repeating on the next section.

Private Sub GroupHeader2_Format(Cancel As Integer, FormatCount As Integer)
If (Me.TxtNumEnc < 1) Then
GroupHeader2.Visible = False
ElseIf (Me.TxtNumEnc >= 1) Then
GroupHeader2.Visible = True

End If
End Sub

 

[dhookom]

Is txtNumEnc in the group header?

Duane
Hook'D on Access
MS Access MVP

 

[MochaLatte]

Yes; the count formula is on the group header. Should I move it?

 

[dhookom]

I would leave it in the group header. I don't have time to create a sample test and try various solutions at the moment. Maybe later tonight or someone else can chime in.

Duane
Hook'D on Access
MS Access MVP