how to send a parameter to a report using vba

[godknow]

i am trying to put a button and clicking it will send the recordsource as parameter to the report. the report is generated using query which needs userid as parameter.

please guide me through VBA code for it.

here is what i have so far

DoCmd.OpenReport " USERReport ", acViewPreview, , " UserID= '" & Me.RecordSource & "'"
it still pompts me for a parameter

thanks

 

[boblarson]

The recordsource can't be set as a parameter.

If you are on a record and the field on the form is UserID also (and is not text):

DoCmd.OpenReport "USERReport", acViewPreview, , "UserID= " & Me.UserID

If it is text:

DoCmd.OpenReport "USERReport", acViewPreview, , "UserID= " & Chr(34) & Me.UserID & Chr(34)

And my code also removed spaces you had which can't be there.

 

[pbaldy]

You wouldn't specify the entire record source there, you'd specify the user ID, like

Me.UserID

In case the field isn't text:

http://www.baldyweb.com/wherecondition.htm

 

[godknow]

You wouldn't specify the entire record source there, you'd specify the user ID, like

Me.UserID

In case the field isn't text:

i tried that, but still it is not working.

DoCmd.OpenReport "USERReport", acViewPreview, , "[UserID] = " & Me.UserID

Image one is Form
Image two is Asking for parameter to show the report after click the button.
Image three is the query that will be used by report.

Plzz help me with this problem. i really need this option.

 

[pbaldy]

The parameter prompt comes from the criteria in your query.

 

[godknow]

The parameter prompt comes from the criteria in your query.

i want avoid it and send my value automatically to generate report based on userid.

 

[godknow]

The parameter prompt comes from the criteria in your query.

got it working