if combo box selection on a userform matches an item found in a separate table, then...

[kbishop94]

I have a combo box on a userform that is populated with the list items that are found within a named table range called "PrimaryCustomers":



What I am trying to figure out is some code that if the selection that is made from the combo box ALSO happens to match one of the names that are present in a second named table range (named: "SecondaryCustomers"), then it will do... <will add some value to a cell on a worksheet>

the second named table range: "SecondaryCustomers"




so if the selection made from the combo box was "Customer 8", and since that selection also matches what is found in the named table range "SecondaryCustomers", then it would populate a some value back on different worksheet.

suggestions?

Thank you

 

[kbishop94]

also (I should have included this in my original post), my current code looks like this:

If frmIncidentEntry.cboCustomer.value = "" Then Cells(llRow, 7).value = "-" Else Cells(llRow, 7).value = frmIncidentEntry.cboCustomer.value             ' (4) customer associated with Incident

my current code only takes the selected item from the list, and as long as what was selected wasn't a "-", or "", then it populates the selection back on my worksheet....

what I am needing is code that expands on that 'If' statement and also looks within the second table ("SecondaryCustomers") to see if there is a match. Thanks again

 

[kbishop94]

I figured this out:

(I'm replying to it in case that it comes up in the future by someone googling a similar request...)

Dim iProB As String
Dim y As Range

If frmIncidentEntry.cboCustomer.value <> "" Then
    iProB = frmIncidentEntry.cboCustomer.value
        With ActiveWorkbook.Worksheets("NameSheet").Range("ProBlendCustomers")
        Set y = .Find(iProB, LookIn:=xlValues)
            If y Is Nothing Then
                    .Cells(llRow, 92).value = "-"
            Else
                    .Cells(llRow, 92).value = frmIncidentEntry.cboCustomer.value
            End If
        End With
    Else
End If