listboxta birden fazla veri gösterimi

[aptillah]

ekteki dosyada litsbox 2 de çalışma sayfaları listbox 1 de bu sayfaların içeriği görülüyor . benim istediğim listbox 1 a sütünunda h sütununa kadar gözükmesi.. birsorunum daha ise listbox1 de seçtiğim bi satırdaki veriler textboxlara geliyor fakat hücrede belirli fala yazı varken textbox boş gözküyor bu 2 konud ayardımlarınız bekliyorum şimdiden teşekkürler

 

[aptillah]

yardım edecek kimse yokmu

 

[aptillah]

arkadaşlar yardımlarınız çok önemli lütfen yardımlarınızı bekliyorum...

 

[Orion1]

Dosyanız ektedir.

Private Sub ListBox2_Change()
sayi = Application.WorksheetFunction.CountA(Worksheets(ListBox2.Value).Range("B1:B70"))
For i = 2 To sayi
        ListBox1.AddItem
        For k = 1 To 8
            ListBox1.List(i - 2, k - 1) = Cells(i, k).Value
        Next
Next
End Sub

Private Sub ListBox1_Click()
If ListBox1.ListCount < 1 Then Exit Sub
box2.Text = ListBox1.Column(0)
box1.Text = ListBox1.Column(1)
tx2.Text = ListBox1.Column(2)
tx3.Text = ListBox1.Column(3)
tx4.Text = ListBox1.Column(4)
tx5.Text = ListBox1.Column(5)
tx6.Text = ListBox1.Column(6)
End Sub

 

[aptillah]

teşekkür ederim orion hocam bir sorum daha olacak bazı hücrelerde fazla karakter olduğu için textbox ta gözükmüyor yani büyük bir textbtbox kullansam textboxt ın sonuna geldiğinde alt satırından devam edermi ?

 

[Orion1]

teşekkür ederim orion hocam bir sorum daha olacak bazı hücrelerde fazla karakter olduğu için textbox ta gözükmüyor yani büyük bir textbtbox kullansam textboxt ın sonuna geldiğinde alt satırından devam edermi ?

Textboxı propertiesten MUltiline özelliğini true yapın ve textboxı istediğiniz büyüklüğe ayarlayın.

 

[aptillah]

sağolun hocam bu site ve sizlerden çok şey öğreniyoruz emekleriniz için çok teşekkürler...

 

[aptillah]

hocam koldarı değiştirdikten sonra listboxın üzerindeki veriyi seçtiğimizde excelin üstünde imleç hareket etmiyor dolayısıyla silmek istemediğim verileri siliyorum kayıt sil butonuna basarak bi yardımcı olurmusun rica etsem

 

[Orion1]

hocam koldarı değiştirdikten sonra listboxın üzerindeki veriyi seçtiğimizde excelin üstünde imleç hareket etmiyor dolayısıyla silmek istemediğim verileri siliyorum kayıt sil butonuna basarak bi yardımcı olurmusun rica etsem

4 nolu mesajda gerekli düzenlemeyi yaptım.
Dosyayı oradan indirebilirsiniz.