T
TotallyConfused
I am trying to open report and a form to enter parameters . This is what I
have - I keep getting error message. Can someone please tell me what I am
doing wrong? Thank you.
'Use this if the source is on the main form
Private Sub Report_Open(Cancel As Integer)
Me.RecordSource = Forms![PCollector].Form.RecordSource
With Forms![PCollector].Form
If .OrderByOn Then
Me.OrderBy = .OrderBy
Me.OrderByOn = True
End If
If .FilterOn Then
Me.Filter = .Filter
Me.FilterOn = True
End If
End With
End Sub
have - I keep getting error message. Can someone please tell me what I am
doing wrong? Thank you.
'Use this if the source is on the main form
Private Sub Report_Open(Cancel As Integer)
Me.RecordSource = Forms![PCollector].Form.RecordSource
With Forms![PCollector].Form
If .OrderByOn Then
Me.OrderBy = .OrderBy
Me.OrderByOn = True
End If
If .FilterOn Then
Me.Filter = .Filter
Me.FilterOn = True
End If
End With
End Sub