Soru listbox veri getirme sorunu

[zulfuernek]

Sayfa19.Select


ListBox1.ColumnCount = 17


ListBox1.ColumnWidths = "65;65;65;65;65;65;65;65;65;65;65;65;65;65;65;65;65"





'ListBox1.ColumnHeads = True 'True olursa listboxta başlık çizgisini gösterir


ListBox1.Selected(ListBox1.ListCount - 1) = False 'True olursa son satira gider Listboxun





Sayfa19.Cells(Rows.Count, 3).End(xlUp).Offset(1, 0).Select




yukarıdaki kodla butona tıklayınca listboxa sayfa 19 da A1:Q32 arasındaki verileri getirmesini istiyorum. ama işlem yapmıyor? ve kırmızı alanda hata uyarısı veriyor

 

[Orion1]

kırmızı satırı silin.

ListBox1.RowSource = "Sayfa19!A1:Q32"

 

[zulfuernek]

@orion hocam. çok mantıklı bir yaklaşım. ben de diyorum bi eksik var ama nerde ))

hocam fakat bişey sorucam bu kodlamada. burda Sayfa19 sayfa ismi değil. Yani sayfanın kök ismi olacak. bunu nasılk değişebilirim

 

[Orion1]

Kök ismi ile denemedim.İsterseniz bir deneyin.

 

[zulfuernek]

denedim ama malesef bakayım sayfa adıyla artık