• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Listbox rowsource hakkında

  • Konbuyu başlatan Konbuyu başlatan bravo64
  • Başlangıç tarihi Başlangıç tarihi
Katılım
21 Eylül 2005
Mesajlar
184
Excel Vers. ve Dili
ofis 365 İngilizce
Merhaba arkadaşlar,
beş sayfadan oluşan çalışma kitabında 2 userform ve 2.userformda multipage var.bu multipagelerde birer listbox var.Ancak listbox rowsource
ile sadece başlıkları görebiliyorum.kod şöyle;
Private Sub userform_initialize()
ListBox1.RowSource = "tahsilat!b1:f" & [b65536].End(3).Row
ListBox1.ColumnCount = 5
ListBox1.ColumnHeads = False
ListBox2.ColumnCount = 5
ListBox2.ColumnHeads = False
ListBox2.RowSource = "çıkış!b1:f" & [b65536].End(3).Row
Frame1.BackColor = vbBlue
Frame2.BackColor = vbRed
End Sub
bu kitapta userformu rowsource olarak atadığım sayfadayken açtığımda yükleme yapıyor,ama başka sayfadayken sadece başlıkları gösteriyor.
ne yapmalıyım acaba?
 
Kodu aşağıdaki gibi değiştirin.

[vb:1:833f8aa673]Private Sub userform_initialize()
ListBox1.ColumnCount = 5
ListBox1.ColumnHeads = False
ListBox1.RowSource = "tahsilat!b1:f" & sheets("tahsilat").[b65536].End(3).Row
ListBox2.ColumnCount = 5
ListBox2.ColumnHeads = False
ListBox2.RowSource = "çıkış!b1:f" & sheets("çıkış").[b65536].End(3).Row
Frame1.BackColor = vbBlue
Frame2.BackColor = vbRed
End Sub
[/vb:1:833f8aa673]

Not:Eğer bir hücre tanımlamasının başında sayfa adı belirtmezseniz aktif sayfadaki değeri alacaktır. örneğin [a1] yerine sheets("sayfa1").[a1] gibi
 
çok teşekkürler..Elinize sağlık..
 
Geri
Üst