Move to specific row in listbox

[Chuck]

How can I move to a specific row in a listbox based on a unique value found
in one of the columns?

Right now I am using this code but the highlight moves from one row to the
next as it tries to find a match. Any better ways?

ListCount = me!mylist.ListCount
varItem = 0
Do Until varItem = ListCount
Me!mylist = Me!mylist.ItemData(varItem)
If Me!mylist.Column(0) = SearchValue Then Exit Do
varItem = varItem + 1
Loop


Thanks

Chuck