ListBox1 Deki verileri sırayla textBox lara aktarmak

[programer]

ListBox'un üzerine çıft tıkladığımda UserForm1 üzerinde bulunan 1 ci textbox'a yazmasını istiyorum sonra ikinci çift tıkladığımda eğer 1 ci textbox dolu ise 2 ciye 2 dolu ise 3 cüye 3 dolu ise 4 cüye .......... böyle devam etmesini istiyorum. Bunu nasıl yapabilirim yardımlarınız için şimdiden teşekkür ederim

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu denermisiniz.

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
    For X = 1 To 15
    If UserForm1.Controls("Kod" & X) = "" Then
    UserForm1.Controls("Kod" & X) = ListBox1.Column(1)
    Exit For
    End If
    Next
End Sub

 

[programer]

Sayın COST_CONTROL yardımınız için teşekkür ederim elinize sağlık

 

[programer]

Sayın COST_CONTROL mesela diyelim aktif olan olan tekxtbox'a aktarması mümkünmü veriyi mause ile 8.ci textbox'a tıkladım listbox'a çift tıkladığımda o an hangi texbox aktifse ona aktarabilirmi veriyi

 

[programer]

Arkadaşlar ben baya denedim ama olmadı tam olarak nerden başlayacağımı bilmiyorum yardımcı olurmusunuz

 

[Korhan Ayhan]

Selamlar,

Ekteki örnek dosyayı incelermisiniz. Class Modul uygulaması ile yapılmıştır.