Synchronising 2 list boxes?

[trickydicky]

I want to synchronize 2 listboxes. I already have them scrolling at
the same time but is it possible to select the same element in both
listboxes? So for example, you could select an item in listbox 1 and
the corresponding element (same index) in listbox 2 be selected
automatically.

Any help would be really appreciated.
Thanks

[Rick Rothstein]

> I want to synchronize 2 listboxes. I already have them scrolling at

the same time but is it possible to select the same element in both
listboxes? So for example, you could select an item in listbox 1 and
the corresponding element (same index) in listbox 2 be selected
automatically.

Try this...

Private Sub List1_Click()
List2.ListIndex = List1.ListIndex
End Sub

Private Sub List1_Scroll()
List2.TopIndex = List1.TopIndex
End Sub

Private Sub List2_Click()
List1.ListIndex = List2.ListIndex
End Sub

Private Sub List2_Scroll()
List1.TopIndex = List2.TopIndex
End Sub

Rick - MVP

[trickydicky]

Thanks very much Rick!

On Mon, 17 Nov 2003 03:57:50 -0500, "Rick Rothstein"
<ri************@NOSPAMcomcast.net> wrote:

I want to synchronize 2 listboxes. I already have them scrolling at
the same time but is it possible to select the same element in both
listboxes? So for example, you could select an item in listbox 1 and
the corresponding element (same index) in listbox 2 be selected
automatically.

Try this...

Private Sub List1_Click()
List2.ListIndex = List1.ListIndex
End Sub

Private Sub List1_Scroll()
List2.TopIndex = List1.TopIndex
End Sub

Private Sub List2_Click()
List1.ListIndex = List2.ListIndex
End Sub

Private Sub List2_Scroll()
List1.TopIndex = List2.TopIndex
End Sub

Rick - MVP