Code
 

Many lists, such as a phone directory list will allow a
quick selection of a list item by entering one or more of
the first several characters in the item name. i.e., I
enter "sm" in an input box and the cell of Smith is
selected. And if I enter just "s" the first "S" entry is
selected.

what does the code to do this look like?

Thank you,

Jon

Code
 

Assume the list is sorted and in column A starting in row 2 of sheet1, code
is for a textbox in a userform.

Private Sub Textbox1_change()
Dim rng as Range
Dim res as Variant
With Worksheets("Sheet1")
set rng = .Range(.Cells(2,1),.Cells(2,1).End(xldown)
res = Application.Match(Textbox1.Text,rng,1)
if not iserror(res) then
Application.Goto reference:=rng(res), Scroll:=True
else
application.Goto reference = .Range("A1"), Scroll:=True
end if
End With
End Sub

If you use a combobox and the list of items is in the list of the combobox
(again, sorted), then this capability is builtin.

--
Regards,
Tom Ogilvy


Jon wrote in message
...
Many lists, such as a phone directory list will allow a
quick selection of a list item by entering one or more of
the first several characters in the item name. i.e., I
enter "sm" in an input box and the cell of Smith is
selected. And if I enter just "s" the first "S" entry is
selected.

what does the code to do this look like?

Thank you,

Jon