DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Anladığım kadarıyla listbox ın sonuna boş bir satır ekleyip oraya gitmek;Arkadaşlar verileri aktardıktan sonra ListBoxta son boş satıra gitmesini istiyorum. Bu konuda yardımlarınızı bekliyorum. Teşekkürler.
Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 2
ListBox1.ColumnWidths = "150;80"
ListBox1.ColumnHeads = True
ListBox1.RowSource = "B2:C" & [A65536].End(3).Row + 1
ListBox1.ListIndex = [A65536].End(3).Row - 1
End Sub
Çok teşekkürler hocam ellerinize sağlık.