LISTBOX : search by first letter

[jonh]

try replacing

    Const cs As String = "Provider=Microsoft.ACE.OLEDB.12.0;" & _ 
        "Extended Properties='Excel 12.0 Xml;HDR=NO;';"

with

    Const cs As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
        "Extended Properties="Excel 8.0;HDR=no;IMEX=1";