ListBox Bilgileri görüntüleme

[power468]

Aşağıdaki kodlarla excel sayfasındaki verileri görüntülüyorum. Ancak yukarı aşağı kaydırdığımda konu başlıkları da kayboluyor sabit kalsın istiyorum. Birde başlıkların üstünde excel sütun harfleri de görünüyor onlarda görünmese daha iyi olur. yardımcı olursanız sevinirim.


Private Sub UserForm_Click()
'ListBox özellikleri belirleniyor

a = WorksheetFunction.CountA(Sheets("ŞGENEL").Range("A1:A65536")) + 1
ListBox4.RowSource = "ŞGENEL!A1" & a
ListBox4.ColumnCount = 16
ListBox4.ColumnHeads = True
ListBox4.ColumnWidths = "40;90;100;90;90;90;100;70;100;80;100;70;90;70;70;100;100"
End Sub

 

[DoğanD]

Merhaba,

RowSource aralığını 2. satırdan başlatıp dener misiniz?