Error can't find table ??
I am trying to open a report filtered by the current user. But I'm getting an error saying the d/b can't find the table or it is misspelled. It is spelled correctly. Do I have a syntax issue with this code...
DoCmd.OpenReport "rptReferrals", acViewPreview, , "[Agent] = '" & DLookup("[CurrentUser]", "LOCALtblCurrentUser" & "'"), acWindowNormal
DoCmd.OpenReport "rptReferrals", acViewPreview, , "[Agent] = '" & DLookup("[CurrentUser]", "LOCALtblCurrentUser" & "'"), acWindowNormal
Last Comment
Check the syntax of the DLookup(). What is the --- & "'" --- before the ending parenthesis?
ASKER
Rey,
I am trying your first suggestion but am getting "Syntax error in string in query expression '[Agent] =" & strAgent & '
The degug.print returns the correct string of characters.
I am trying your first suggestion but am getting "Syntax error in string in query expression '[Agent] =" & strAgent & '
The degug.print returns the correct string of characters.
SOLUTION
THIS SOLUTION IS ONLY AVAILABLE TO MEMBERS.
View this solution by signing up for a free trial.
Members can start a 7-Day free trial and enjoy unlimited access to the platform.
ASKER CERTIFIED SOLUTION
THIS SOLUTION IS ONLY AVAILABLE TO MEMBERS.
View this solution by signing up for a free trial.
Members can start a 7-Day free trial and enjoy unlimited access to the platform.
Microsoft Access
Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.
226K
Questions
--
Followers
--
Top Experts
Get a personalized solution from industry experts
TRUSTED BY
dim strAgent as string
strAgent=Dlookup("CurrentU
debug.print strAgent
DoCmd.OpenReport "rptReferrals", acViewPreview, , "[Agent] ="" & strAgent & "'"
or this
DoCmd.OpenReport "rptReferrals", acViewPreview, , "[Agent] = '" & DLookup("[CurrentUser]", "LOCALtblCurrentUser") & "'" acWindowNormal