If there are the same number of entries in each list, then lstNumber.ListInex = lstName.ListIndex should do the job.

------------------
Marty