Synkronisering af lister

Når der klikkes på et punkt i list1, bliver det tilsvarende punkt valgt i list2

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

Hivs der ikke nødvendigvis er lige mange elementer i hver liste, kan du jo tjekke forinden:

Private Sub List1_Click()
  If List2.ListCount > List1.ListIndex Then
    List2.ListIndex = List1.ListIndex
  End If
End Sub

Nårh, det var jo rimeligt simpelt! tak!

Det kræver self at dine lister er sorteret ens....

Ellers kan man lave det med en tag når du tilføjer teksten......

men ved du 100% at teksten kun optræder en gang kan du jo lave løkke der er lige smutter listen igennem.......

Men jeg tror jeg ville lave det med en tag......

Hvis du gerne vil have et eksempel på det så kan du jo lige sige til......