Dostlarıma selamlar.
Kodlarıyla bilgilerimi listbox'a aktarıyorum. Fakat yavaş çalışma sorunu var. Biraz araştırdıktan sonra
kodunu uyguladım ve sonuç 110 çıktı. Ama bende o kadar bilgi yokki. listbox'ta 5 satır var ama 110 görünüyor. Bu da yavaşlatıyor. Bunun nedeni ne olabilir.Ve de bir kodla listbox'a "son" değişkeni kadar satır sınırlaması yaptırabilir miyiz? ve bir sorum daha olacak; Lİstbox'a 10 dan fazla sütun koyabilir miyiz?
Destek olursanız sevinirim..
Kod:
ListBox1.Clear
son = Sheets(Firma).Cells(65536, 1).End(xlUp).Row
For i = 1 To son
c = c + 1
For y = 1 To 10
ListBox1.AddItem
ListBox1.List(c - 1, y - 1) = Sheets(Firma).Cells(i + 6, y).Value
Next
Next
Kod:
MsgBox ListBox1.ListCount
Destek olursanız sevinirim..