If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Dlookup Question
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! |
#2
|
|||
|
|||
Dlookup Question
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! |
#3
|
|||
|
|||
Dlookup Question
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! |
#4
|
|||
|
|||
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! |
#5
|
|||
|
|||
Dlookup Question
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! |
#6
|
|||
|
|||
Dlookup Question
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! |
Thread Tools | |
Display Modes | |
|
|