listbox aktif sayfadan veri almasın..

[tlgtrn]

arkadaşlar aşağıdaki kodda listboxa aktif sayfadan veri alıyor.. halbuki ben sayfa1 den almasını istiyorum.. bunun içinde s1 kullandım ama olmuyor.. nerde hata yapıyorum??

Private Sub UserForm_Initialize()
Set s1 = Sheets("Sayfa1")
ListBox1.ColumnCount = 4
ListBox1.RowSource = s1.["A3:D"] & [d65536].End(3).Row
Label1.Caption = Date & " itibari ile stok durumu :"
End Sub

 

[Levent Menteşoğlu]

ListBox1.RowSource = s1.["A3"] & [d65536].End(3).Row

Yukarıdaki satırı aşağıdaki ile değiştirin.

ListBox1.RowSource = "sayfa3!a3:d" & s1.[d65536].End(3).Row

 

[tlgtrn]

teşekkür ederim leventm, işe yaradı..

koddaki "sayfa3!" ü sayfa1! diye değiştirdim tabii..

 

[heft]

Merhabalar
diyelim ki Yukarıdaki listbox1 bilgiyi Kitap1 deki sayfa1 den alıyor ama kitap2 aktif ve kitap 2 userform1 açık ve aktif
bu durumda
ListBox1.RowSource = "sayfa1!a3:d" & s1.[d65536].End(3).Row

yi nasıl tanımlamak gereki ?

 

[heft]

tekrar hatırlatsam

 

[tlgtrn]

gerçekten de nasıl olacak bilen yok mu?
ben denedim karışıyor.. daha doğrusu tesadüfen dikkat ettim. başka bir kitap aktifken, listbox1 bu kitabın sayfa1'indeki değerleri okuyor..