ok ho capito.
Ti faccio un breve esempio:

codice:
Private Sub List2_Scroll()
    List1.TopIndex = List2.TopIndex
End Sub
inquesto modo scrollando la list2, scrolli pure la list1.
Da qui poi è tutto un gioco.....

Prova e fammi sapere!