İkinci Listbox'ın farklı sayfadan veri alması

[Emine Şahin]

Merhaba arkadaşlar.
Aşağıdaki kodlarımla açık olan sayfadan veri almasını sağlıyorum. Ancak ikinci bir listbox oluşturduğumda aşağıdaki kodlar ilgili sayfanın verileri almıyor?
Almasını istediğim sayfanın adı "takip"
Ne yapmam gerek?

Private Sub UserForm_Initialize()
sat = Cells(Rows.Count, "A").End(xlUp).Row
    sut = Cells(1, Columns.Count).End(xlToLeft).Column
    
    With ListBox1
        .ColumnCount = sut 'kolon sayısı
        For i = 1 To sut
            deg = deg & CLng(Columns(i).Width) & ";"
        Next i
        .ColumnWidths = deg
        .RowSource = "takip!A1:AH" & sat 'veri aralığı
    End With
End Sub

 

[Levent Menteşoğlu]

Eğer aktif sayfanın dışında farklı bir sayfadan veri alacaksanız cells,range,columns,rows gibi komutların başında sayfa adını tanımlamanız gerekir. Örneğin,

sheets("takip").cells(...) yada sheets("takip").columns(i) gibi.

 

[Emine Şahin]

Eğer aktif sayfanın dışında farklı bir sayfadan veri alacaksanız cells,range,columns,rows gibi komutların başında sayfa adını tanımlamanız gerekir. Örneğin,

sheets("takip").cells(...) yada sheets("takip").columns(i) gibi.

Teşekkür ederim Levent Bey.
Faydalı bir bilgi oldu.