Listindex value

[Av8tordude]

I have this code that does not appear to work as expected. If I select the name using the Dropdown arrow, it finds and selects the name in the sheet. However, when I type a name that is listed in the sheet, it selects the header. Whenever I type in the name, even though there may be a name already existing, I want to treat it as a new entry. It should not select anything. What am I missing.

Thank you for your kind help

Dim Rng As Range

Set Rng = Range("A" & cbName.ListIndex + 3)


cbName = UCase(cbName)
If cbName.ListIndex <> -1 Then
    Application.EnableEvents = False
    Rng.Select
    Application.EnableEvents = True
End If

 

[dmt32]

try

Private Sub cbName_Change()
    If cbName.ListIndex <> -1 Then Range("A" & cbName.ListIndex + 3).Select
End Sub

Dave