I have a report which has 5 columns. If the user selects the category "R" though, then only 4 columns appear. I have formatted the report to squish (technical term) together when this happens, but the page still prints to the far left (margin of 0.45).
How do I make this Page Setup margin equal 0.90 when the user selects the category "R"?
My code in the "On Activate" event is:
Private Sub Report_Activate()
With CodeContextObject
If (Forms![F-BUDGET LEVEL]![BUDLEV] = "R") Then
Me.ERREQLINE2.Visible = False
Me.ERREQLINE1.Visible = False
Me.[R-GF-EXP-DEPTLEV-SUBRPT].Report![EXPREQLINE1].Visible = False
Me.TCRREQLINE1.Visible = False
Me.HEADERLINE.Width = 6360
Me.TITLE.Width = 9600
Me.BUDLEVELDESCR.Width = 9600
End If
End With
End Sub
I've tried adding:
Me.Report.Left = 0.90
But it tells me this property is read only.
Thanks!
How do I make this Page Setup margin equal 0.90 when the user selects the category "R"?
My code in the "On Activate" event is:
Private Sub Report_Activate()
With CodeContextObject
If (Forms![F-BUDGET LEVEL]![BUDLEV] = "R") Then
Me.ERREQLINE2.Visible = False
Me.ERREQLINE1.Visible = False
Me.[R-GF-EXP-DEPTLEV-SUBRPT].Report![EXPREQLINE1].Visible = False
Me.TCRREQLINE1.Visible = False
Me.HEADERLINE.Width = 6360
Me.TITLE.Width = 9600
Me.BUDLEVELDESCR.Width = 9600
End If
End With
End Sub
I've tried adding:
Me.Report.Left = 0.90
But it tells me this property is read only.
Thanks!