"SELECT JOB_NO.CUSTCODE, JOB_NO.JOB_NO" & Chr(13) & "" & Chr(10) & "FROM
`K:\DATA\DBDATA\JOBDATA`\JOB_NO.DBF JOB_NO" & Chr(13) & "" & Chr(10) &
"WHERE (JOB_NO.JOB_NO=" & Worksheets("Sheet1").Range("A1").Value & ")"

--
Regards,
Tom Ogilvy

"Sharlene England" wrote in message
...
I want to have the user type into cell A1 then the query will get the
correct information.

The following works:
"SELECT JOB_NO.CUSTCODE, JOB_NO.JOB_NO" & Chr(13) & "" & Chr(10) & "FROM
`K:\DATA\DBDATA\JOBDATA`\JOB_NO.DBF JOB_NO" & Chr(13) & "" & Chr(10) &
"WHERE (JOB_NO.JOB_NO=50068)")


but now I want to replace the 50068 above with a cell reference to the
value
in cell A1.

I've tried and tried and can't get this to work.

Any help would be greatly appreciated.

Thanks.