Lİstboxt Ta İnvalİd Property Hatasi

[atöz]

Herkese merhaba,

Aşağıdaki kodlamada "UserForm11.ListBox1.List(C - 1, 10) = Sayfa6.Cells(A, 11).Value" satırında " Could not set the list property .İnvalid property value" hatası veriyor. o satırı sildiğimde hata vermeyip listeliyor.Yardımcı olusanız sevinirim.



Teşekkürler


Private Sub CommandButton6_Click()
UserForm11.ListBox1.Clear
Sheets("TAKIP").Select
Application.ScreenUpdating = False
[a1:az1].AutoFilter
[a1:az1].AutoFilter Field:=12, Criteria1:="" & "A"
Sheets("suz").Cells.ClearContents
[e2].CurrentRegion.Copy
Sheets("suz").[a1].PasteSpecial Paste:=xlPasteValues
[a1:az1].AutoFilter
Sheets("suz").Select
UserForm11.ListBox1.ColumnCount = 11
UserForm11.ListBox1.ColumnWidths = "20;80;80;100;80;80;80;80;80;60;60"
For A = 2 To Cells(65536, 1).End(xlUp).Row
If Cells(A, 1) <> "" Then
C = C + 1
UserForm11.ListBox1.AddItem
UserForm11.ListBox1.List(C - 1, 0) = Sayfa6.Cells(A, 1).Value
UserForm11.ListBox1.List(C - 1, 1) = Sayfa6.Cells(A, 2).Value
UserForm11.ListBox1.List(C - 1, 2) = Sayfa6.Cells(A, 3).Value
UserForm11.ListBox1.List(C - 1, 3) = Sayfa6.Cells(A, 4).Value
UserForm11.ListBox1.List(C - 1, 4) = Sayfa6.Cells(A, 5).Value
UserForm11.ListBox1.List(C - 1, 5) = Sayfa6.Cells(A, 6).Value
UserForm11.ListBox1.List(C - 1, 6) = Sayfa6.Cells(A, 7).Value
UserForm11.ListBox1.List(C - 1, 7) = Sayfa6.Cells(A, 8).Value
UserForm11.ListBox1.List(C - 1, 8) = Sayfa6.Cells(A, 9).Value
UserForm11.ListBox1.List(C - 1, 9) = Sayfa6.Cells(A, 10).Value
UserForm11.ListBox1.List(C - 1, 10) = Sayfa6.Cells(A, 11).Value

End If
Next

 

[isakarakus]

Sutun sayısı fazla olduğu için hata veriyor olabilir,
komutla eklemelerde 10 dan fazla sutun kullanılamıyor.