Dlookup Question
Sorry missed the closing double quotes off the end
...... And Active = 'yes'")
"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!
|