RunTime error: 3075 - Dlookup Issue

[adigga1]

Hello Experts,

I'm about to go grey with this dlookup statement:

I'm trying to run a dlookup statement, I have the correct expression string, etc. but when I run it under the Immediate window for testing I'm getting the runtime error.

Scanerio:

I'm calling an associated Price value (Currency) for a Code (text) from a Query in order to have an auto population in the fields; here is the code:

 Private Sub CPTcode_AfterUpdate()
    Charge = DLookup("Charge", "Q_CPT-phys test1", "CPTcode= '& CPTcode'")
End Sub

It only populates if i replace the "& CPTcode" with an actual value. This is pulling from the same Subform.

Please Help

Adigga1

[mandanarchi]

Try this instead.

Charge = DLookup("Charge", "Q_CPT-phys test1", "CPTcode= '" & CPTcode & "'")

I have issues with DLookups too, it's not just you =)

[adigga1]

mandanarchi,


Thank you for your suggestion; I will try this code and follow-up with the results.

Adigga1


It ran Successfully!! Thank you

[missinglinq]

Is CPTcode a Text or Numeric Datatype? The syntax varies accordingly.

For Numeric CPTcode:

Me.Charge = DLookup("Charge", "Q_CPT-phys test1", "CPTcode= "& Me.CPTcode)

For Text CPTcode:

Me.Charge = DLookup("Charge", "Q_CPT-phys test1", "CPTcode = '" & Me.CPTcode & "'")

Welcome to Bytes!

Linq ;0)>