DoCmd.OpenForm Expected: =

Question

I'm attempting to pull a row of data in a table by opening a separate form using the DoCmd.OpenForm command. I have raw data that is copied into a text box and the code pulls out the time, tech and customer. That all works fine but the OpenForm is failing me! I CAN run the code as follows:

DoCmd.OpenForm(FrmWho)

But I want to add the where condition "[Tech] = '" & TechName & "'". I applied the single quotes because, as I understand it, strings require them in this case. No matter how I attempt to apply the code, it gives me the Compile Error: "Expected: ="

DoCmd.OpenForm(FrmWho, , , "[Tech] = '" & TechName & "'")

DoCmd.OpenForm(FrmWho, WhereCondition:="[Tech] = '" & TechName & "'")

Neither of these versions work, nor about 30 other attempts I made. What am I missing?

Answer 1

Hallo GrayHelo,

GrayHelo schrieb folgendes:
...

But I want to add the where condition "[Tech] = '" & TechName & "'". I applied the single quotes because, as I understand it, strings require them in this case. No matter how I attempt to apply the code, it gives me the Compile Error: "Expected: ="
DoCmd.OpenForm(FrmWho, , , "[Tech] = '" & TechName & "'")

Try:

DoCmd.OpenForm FrmWho, , , "[Tech] = '" & TechName & "'"
HTH
Gunter

---

Access FAQ: http://www.donkarl.com

      http://www.avenius.com - http://www.AccessRibbon.com
http://www.ribboncreator.com - http://www.ribboncreator2010.com

Answer 2

The form name must be a literal string, or a variable or constant whose value is the name of the form:

DoCmd.OpenForm "FrmWho", WhereCondition:="Tech = ""'" & Me.TechName & """"

A couple of points to note:

1.  By explicitly naming the WhereCondition argument you don't need to include all the extra commas.

2.  The use of a pair of contiguous quotes characters to represent a literal quotes character is preferable to a single quote character with personal names, which might contain apostrophes, e.g. Cináed O'Siridean.

Answer 3

I could swear I tried that but must've messed something else when I did. It works perfectly now though. Thanks guys!

Answer 4

Hey Gray -

31. Have you tried without the parenthesis?

DoCmd.OpenForm FrmWho, , , "[Tech] = '" & TechName & "'"