could not set the list property. İnvalid property array index." hatası verdi. Textboxlar da 1, 2, 3 gibi değiştirmedim ustam

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
For x = 0 To 10
Controls("TextBox" & x + 1).Value = ListBox1.List(x, 0)
Next x
End Sub

(25/04/2021, 01:29)malatyalı yazdı: List(x, 0)

Burası hatalı.Daha önce yazdığım gibi listindexli olarak deneyin.

Sayın feraz hayırlı geceler
Ben yapamadım vallaha

(25/04/2021, 01:40)malatyalı yazdı: Sayın feraz hayırlı geceler
Ben yapamadım vallaha

Sizede abey.
Pc başında değilim abey örneğinizi ekleyin sahurda bakayım(3 saat sonra) berduş hocamız lalletmezse.

sayın @malatyalı aşağıdaki kodu denedim çalışıyor, yani 2. mesajda yazdığım kod doğru

For x = 0 To 10

    Controls("textbox" & x + 1).Value = Me.ListBox1.List(0, x)

Next x

---

(25/04/2021, 03:13)berduş yazdı: sayın @malatyalı aşağıdaki kodu denedim çalışıyor, yani 2. mesajda yazdığım kod doğru

For x = 0 To 10

    Controls("textbox" & x + 1).Value = Me.ListBox1.List(0, x)

Next x

Berduş hocam kodunuz çalışıyor ama her zaman 1.satırdaki veriler geliyor 0 olduğu için.Listindex ise seçilen satırdaki satır noyu bulur abey.

For x = 0 To 10

    Controls("textbox" & x + 1).Value = Me.ListBox1.List(ListBox1.ListIndex, x)

Next x

---

Yada listyerine Column olarak alttaki gibi olur parantez içi yerdeğiştirip.

For x = 0 To 10

    Controls("textbox" & x + 1).Value = Me.ListBox1.Column(x, ListBox1.ListIndex)

Next x