eliminate group header on print

[ssblue]

i have a report that i would like to show on screen put
when it goes to print i don't want a certain group header
to print out.

 

[fredg]

i have a report that i would like to show on screen put
when it goes to print i don't want a certain group header
to print out.

Here is the Report Coding you will need.

Option Compare Database
Option Explicit
Dim intHide As Integer

Private Sub Report_Activate()
intHide = -1
End Sub

Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As
Integer)
intHide = intHide + 1
End Sub

Private Sub GroupHeader0_Format(Cancel As Integer, FormatCount As
Integer)
Cancel = intHide > 0
End Sub

Change GroupHeader0 to the name of your Group Header.