Two Page Report Problem

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

Guest

PROBLEM:
I am trying to provide the user the ability to add a attachment to a
traditional one page report, it works but reports that are one page now have
a second formated page. the margins are configured properly it is just when
one of the records contain a second page then all records have a second page.
I am trying to tell the report if there is no record in the subReport do not
show the section or page and visa versa. Below is the code I TRIED using but
this does not work.

'Hide Page if there is no attachment
If IsNull(Reports![CYF IH Contact
Summary]![subContSum2].Reports![txtCYFIHContSumID2]) Then
Me.pag01.Visible = False
Else
Me.pag01.Visible = True
End If


'Hide Report Footer if there is no attachment
If IsNull(Reports![CYF IH Contact
Summary]![subContSum2].Reports![txtCYFIHContSumID2]) Then
Me.ReportFooter.Visible = False
Else
Me.ReportFooter.Visible = True
End If
 
Set your subreport height to 0" and property grow set to yes, make sure the
subreport is located in the detail section of the master report, I hope this
helps
 
Beautiful! Thanx partner!

jl5000 said:
Set your subreport height to 0" and property grow set to yes, make sure the
subreport is located in the detail section of the master report, I hope this
helps

Tru said:
PROBLEM:
I am trying to provide the user the ability to add a attachment to a
traditional one page report, it works but reports that are one page now have
a second formated page. the margins are configured properly it is just when
one of the records contain a second page then all records have a second page.
I am trying to tell the report if there is no record in the subReport do not
show the section or page and visa versa. Below is the code I TRIED using but
this does not work.

'Hide Page if there is no attachment
If IsNull(Reports![CYF IH Contact
Summary]![subContSum2].Reports![txtCYFIHContSumID2]) Then
Me.pag01.Visible = False
Else
Me.pag01.Visible = True
End If


'Hide Report Footer if there is no attachment
If IsNull(Reports![CYF IH Contact
Summary]![subContSum2].Reports![txtCYFIHContSumID2]) Then
Me.ReportFooter.Visible = False
Else
Me.ReportFooter.Visible = True
End If
Click to expand...
Click to expand...
 
Back
Top