I think you can use the scroll event. Using something like:

Code:
Private Sub listbox1_Scroll()
   lisbox2.TopIndex = lisbox1.TopIndex 'or something
End Sub
[Edited by pardede on 05-16-2000 at 02:45 PM]