>Has anyone found a way to set the selected item in a listbox to the top item without changing itemid or listitemid and without repoping the list? IOW, programatically scroll down until the selected item is topitem?

with myList
 lnIndex = .ListIndex
 .ListIndex = .ListCount
 .ListIndex = lnIndex
endwith

Cetin