userform_initialize

[eseseski]

multi page sayfasındaki listbox1 ve listbox 2 sayfalarını nasıl bir kod yazarak userform_ınitialize seçeneğinde ekranda gösterebilirim

Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 7
ListBox1.RowSource = "KİŞİSEL!A2:G" & Sheets("KİŞİSEL").Range("B65536").End(xlUp).Row
ListBox1.ColumnWidths = "100;100;100;100;100;100;50"
End Sub

Private Sub UserForm_Initialize()
ListBox2.ColumnCount = 7
ListBox2.RowSource = "KİŞİSEL!I2:O" & Sheets("KİŞİSEL").Range("J65536").End(xlUp).Row
ListBox2.ColumnWidths = "100;100;100;100;100;100;50"
End Sub

 

[hımmmmmmmm]

tam olarak ne demek istediğini anlamadım ama şöylemi demek istedin...

kişisel sayfasında a:g ve ı sütunlarında veriler var
bu veriler form çalışdığında multipage nesnesinde, 2 ayrı listbox kutusunda görünsün..

ekdeki prg. yardımcı olurmu bilmiyorum...

 

[eseseski]

evet hocam sorun ve çözümü budur sağ olasın