listboxa veri alamıyorum

[hurkanpisirici]

iyi günler gönderdiğim ekte başka arkadaşların yaptığı çalışmalardan kendime uyarlayabildiğim kadarıyla yaptığım bir telefon rehberi var yalnız ben buna birde listbox ekledimn ama veri aktaracağım kodları bulamadım bir bakarsanız sevinirim teşekkürler

 

[teknikyapı]

Merhaba.Dosya ekte birşeyler yapmaya çalıştım.

 

[udentr2002]

aşağıdaki kodları userformun initialize bölümüne eklerseniz form açıldığuında sayfadaki veriler listboxda görülecektir

Private Sub UserForm_Initialize()
ListBox1.RowSource = "Sayfa1!a2:d" & Sheets("Sayfa1").Range("a65536").End(3).Row
ListBox1.ColumnCount = 4
ListBox1.ColumnHeads = True

End Sub

 

[udentr2002]

benim daha önce yaptığım rehber ile ilgili basitdde olsa bir çalımam vardı onuda göndereyim belki işinize yarayabilir.

 

[hurkanpisirici]

arkadaşlar çok teşekkür ederim sağolun kolay gelsin

 

[hurkanpisirici]

sayın udentr2002 tam benim sitediğim gibi anlaşır ve sade kendimede uyarklayabilirim herhalde çok teşekkürler

 

[udentr2002]

işinize yaramasına sevindim