worked like a charm! thank you!

"RonaldoOneNil" wrote:

Also it needs to be all on one line unless you use the underscore
continuation character.

"buzzmcduffie" wrote:

I'm still getting a syntax error when I copy and paste your code. I must not
understand.

"RonaldoOneNil" wrote:

The following assumes that all your fields in the Lookup are Text values and
so are surrounded by single quotes.

Me![Goal] = DLookup("[Goal]", "tblMailCodeTasks", "MailCode = '" &
[Forms]![frmManualTasksDataEntry]![cbxMailCodeTask] & "' And
DisabilityIndicator = '" &
[Forms]![frmManualTasksDataEntry]![cbxDisabilityIndicator] & "' And State =
'" & [Forms]![frmManualTasksDataEntry]![cbxState] & "' And Active = 'yes')

"buzzmcduffie" wrote:

I have a form that needs to look up a "goal" by matching several fields in a
table. I can't figure out how to do dlookup with multiple criteria

Form = frmManualTaskDataEntry
[employee]
[cbxMailCodeTask]
[cbxState]
[cbxDisabilityIndicator]
[cbxVolumeCode]

Table = tblMailCodeTasks
MailCodeTask
State
DisabilityIndicator
VolumeCode
Goal
Active

Here's what I have that doesn't work:

Private Sub cbxCompany_AfterUpdate()
Me![Goal] = DLookup("[Goal]", "tblMailCodeTasks", tblMailCodeTasks.MailCode
= [Forms]![frmManualTasksDataEntry]![cbxMailCodeTask]) And
((tblMailCodeTasks.DisabilityIndicator) =
[Forms]![frmManualTasksDataEntry]![cbxDisabilityIndicator]) And
((tblMailCodeTasks.State) = [Forms]![frmManualTasksDataEntry]![cbxState]) And
((tblMailCodeTasks.Active) = "yes")
End Sub

Any help is appreciated!