listbox a sondan belli bi sayıda veri alabilmek

[byteman_2]

sayın arkadaşlar sayfa bir e düzenli olarak kayıtlar yapılıyor fakat benim istediğim bu kayıtlar yapılırken userformumdaki listbox a sadece son otuz kayıt görünsün istiyorum.

yardımlarınız için teşekkürler.

 

[byteman_2]

arkadaşlar yardım lütfen

arkadaşlar yardımlarınızı bekliyorum

 

[zafer]

Merhaba

Kodları userformun kod sayfasına yapıştırınız
Kayıt yaptığınız butonun en altına aktar yazınız

sub aktar()
son = Sheets("sayfa1").Cells(65536, 1).End(xlUp).Row
son30 = son - 30
ListBox1.RowSource = "sayfa1!a" & son30 & ":a" & son
end sub

 

[byteman_2]

Sayin Zafer TeŞekkÜrler

Sorunsuz ÇaliŞiyor...