Listboxtaki verilerin tamamını otomatik olarak seçmek

[fatiheryildiz]

Herkese iyi çalışmalar kodlarım aşağıdaki gibidir.
Checkbox check yaptığımda listboxtaki listenin tamamını seçmesini istiyorum ama hata alıyorum.

Private Sub CheckBox2_Change()
Dim i As Long
If CheckBox2.Value = True Then
For i = 0 To ListBox1.ListCount
ListBox1.Selected(i) = True
Next i
End If
End Sub


Yardımcı olacak arkadaşlar için şimdiden teşekkür ederim.

 

[Korhan Ayhan]

Deneyiniz.

For i = 0 To ListBox1.ListCount - 1

 

[fatiheryildiz]

Önce bu yöntemi denedim çözemedim ama sonradan çözdüm. Çok teşekkür ederim.