listbox da Select İptali

[ybilgin]

Merhaba,
Aynı Userform içinde farklı sayfalardan farklı veriler alan İki Adet ListBox var. Listbox1 de seçili veri var. ve List Box dada seçili veri var. Ben iki listboxta aynı anda seçili veri olmasın istiyorum. yani Listbox1 Click deyince, Listbox2 deki Select iptal olsun, Aynı şekilde Listbox2 ye click yapınca Listbox1 deki Select İptal olsun. Yani Sadece Click yaptığım listbox Select aktif olsun. çünkü, Kommand butonlarım Listboxtaki selecte göre çalışıyor. yardımcı olacak üstadlara teşekkürler :yardim:

 

[hamitcan]

Aşağıdaki şekilde dener misiniz? Umarım doğru anlamışımdır.

Private Sub ListBox1_Click()
For i = 0 To ListBox1.ListCount
If ListBox1.Selected(i) Then
For j = 0 To ListBox2.ListCount
ListBox2.Selected(j) = False
Next
End If
Next
End Sub

Private Sub ListBox2_Click()
For i = 0 To ListBox2.ListCount
If ListBox2.Selected(i) Then
For j = 0 To ListBox1.ListCount
ListBox1.Selected(j) = False
Next
End If
Next
End Sub

 

[Levent Menteşoğlu]

Birde aşağıdaki gibi deneyin.

Private Sub ListBox1_Click()
ListBox2.Listindex=-1
End Sub

Private Sub ListBox2_Click()
ListBox1.Listindex=-1
End Sub

 

[ybilgin]

okey

okey verilen kodların ikiside işi görüyor. tşk.