ActiveX Listbox change olayı

[EDE]

Bir excel sayfasında iki adet activeX listbox var. İkinci listbox da hangi satır işaretlenirse birinci listbox ta da aynı satır select edilmiş olsun istiyorum lakin yapamadım.

Private Sub ListBox1_Change()

ListBox2.Value = ListBox1.Value

End Sub

Tamamen tahmini olarak böyle bir kod yazdım, çalışmadı. Bilgisi veya önerisi olan arkadaş var ise memnun olurum.
Saygılarımla.

 

[Korhan Ayhan]

Deneyiniz.

Option Explicit

Private Sub ListBox1_Click()
    ListBox2.ListIndex = ListBox1.ListIndex
End Sub

 

[EDE]

Deneyiniz.

Option Explicit

Private Sub ListBox1_Click()
    ListBox2.ListIndex = ListBox1.ListIndex
End Sub

Korhan bey zahmet verdim çok teşekkür ederim. Kafamı çok kurcalıyordu gerçekten teşekkür ederim.