Macro to VBA not working?

[mgio]

Hello I created a Macro to use to open a form with certain parameters but it is not working after being converted to vba and yes event procedure is selected for the event.

Private Sub Enter_Click()
On Error GoTo Enter_Click_Err


DoCmd.SetParameter "StartDate", StartDate
DoCmd.SetParameter "EndDate", EndDate
DoCmd.OpenReport "ActivityCde", acViewReport, "", "", acNormal




Enter_Click_Exit:
Exit Sub


Enter_Click_Err:


MsgBox Error$
Resume Enter_Click_Exit


End Sub

[June7]

I have never even seen SetParameter method (I don't use macros). http://msdn.microsoft.com/en-us/libr...ffice.15).aspx No idea how it should work with OpenReport method. I would use:

DoCmd.OpenReport "ActivityCde", acViewReport, , "[datefield] BETWEEN #" & Me.StartDate & "# AND #" & Me.EndDate & "#"

[mgio]

got an error expected end of statement and it highlighted the Me in me.enddate. any ideas?

[June7]

Sorry, I am missing & in the concatenation. I edited the previous post.

I am assuming StartDate and EndDate are names of unbound controls for entering filter criteria.

[mgio]

That's correct but is there a way I can feed the parameters before opening report

[June7]

I assumed you have a form where user enters start and end dates into unbound controls. This code should be behind that form. User inputs parameters and clicks a button to open report. Additional code can verify both dates provided and only open report if that is the case.