A
Alain
Hi guys,
I have a small problem, I need to have some subreport when running/printing
but it is always visible.
I am using similar code on my forms and it is working just fine, I have
replace the form part with the report but obviuosly something is wrong !
Can anyone tell me what I am doing wrong:
the subfrmPropCosts and subfrmPropSales are the proper name of the reports
'affichage du Sales subform et repositionnement de quelques controles
If Surplus Then
Me.Label408.FontBold = True
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.subfrmPropSales.Visible
= True
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.Label347.Top =
5850
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.CostsNotes.Top =
6075
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.CostsNotes.Height
= 1500
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Height = 9000
Reports![rpt-frmOwnedProperties].subfrmPropTaxes.Top = 13176
Else
Me.Label408.FontBold = False
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.subfrmPropSales.Visible
= False
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.Label347.Top =
3240
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.CostsNotes.Top =
3600
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.CostsNotes.Height
= 1500
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Height = 5800
Reports![rpt-frmOwnedProperties].subfrmPropTaxes.Top = 10750
End If
Thanks
Alain
I have a small problem, I need to have some subreport when running/printing
but it is always visible.
I am using similar code on my forms and it is working just fine, I have
replace the form part with the report but obviuosly something is wrong !
Can anyone tell me what I am doing wrong:
the subfrmPropCosts and subfrmPropSales are the proper name of the reports
'affichage du Sales subform et repositionnement de quelques controles
If Surplus Then
Me.Label408.FontBold = True
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.subfrmPropSales.Visible
= True
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.Label347.Top =
5850
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.CostsNotes.Top =
6075
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.CostsNotes.Height
= 1500
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Height = 9000
Reports![rpt-frmOwnedProperties].subfrmPropTaxes.Top = 13176
Else
Me.Label408.FontBold = False
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.subfrmPropSales.Visible
= False
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.Label347.Top =
3240
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.CostsNotes.Top =
3600
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Report.CostsNotes.Height
= 1500
Reports![rpt-frmOwnedProperties].subfrmPropCosts.Height = 5800
Reports![rpt-frmOwnedProperties].subfrmPropTaxes.Top = 10750
End If
Thanks
Alain