Birden Fazla Sütunları Tek Bir ListBox'ta Listeleme

[ottoman71]

Merhaba Arkadaşlar,
Birden fazla sütunları tek bir listbox'ta nasıl listelerim.
Ekteki dosyada örnek bir form hazırladım.
Burada yapılması gereken sheets1 deki A:S sütunlarındaki verileri tek bir listbox'ta görüntülemek.
ListBox'ta listelenen verilerde aşağıda anlatılanlar yapılabilir mi?
1- Ctrl tuşu ile birden fazla satır veya sütunu seçmek
2- Seçili satır veya sütunlar kopyalanabilecek
3- Listbox'ın başlığını birinci satırdan, Sıra numarasını ise kendi verecek.
3- Seçili satır veya sütunlar check box işaretli ise yapıştırma yapılabilecek.
4- Check box işaretli ise hücrelere manuel giriş yapılabilecek.

Bu maddelerden 1 ve 2 nolu ihtiyaç seviyesi yüksek. 3 nolu madde orta derecede iytiyaç var. 4 ve 5 nolu maddeye ise olursa iyi olur, olmasada olur yani

Yardımcı olursanız sevinirim.
İyi çalışmalar.

 

[mustafakoker]

Merhaba Arkadaşlar,
Birden fazla sütunları tek bir listbox'ta nasıl listelerim.

aşağıdaki kodu uygulayınız

Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 19 ' lisbox'ta ki sütun sayısı
    ListBox1.ColumnWidths = "60;65;65;65;65;65;65;65;65;65;65;65;65;65;65;65;65;65;65" 'lisbox'taki sütunların genişliği
     ListBox1.RowSource = "Sayfa1!A2:s" & Sheets("Sayfa1").Range("A65536").End(xlUp).Row 'lisbox'ta gösterilecek hücre aralığı
    ListBox1.ColumnHeads = True 'listboxta birinci satırı sabitler tıklanmaz

  
End Sub

 

[mustafakoker]

ekli dosyayı inceleyiniz

 

[ottoman71]

Hocam ilgilendiğiniz için teşekkur ederim.
Listeleme işlemi istediğim gib. Fakat bu listbox'taki birden fazla satırları nasıl seçebilirim. Örneğin;
Mause ile ilk 10 satırı veya Listbox'taki tüm verileri seçip, Ctrl+C ile kopyalamak istiyorum. Bu verileri başka bir programa yapıştıracağım.
Bunu yapabilirmiyiz?

 

[Korhan Ayhan]

Selamlar,

Sn. ottoman71,

ListBox adıda üzerinde bir veri listeleme ve görüntüleme aracıdır. Siz listelediğiniz veriler üzerinde işlem yapmak istiyorsunuz. Bunun için SpreadSheet nesnesini araştırın. Forumda örnekler bulabilirsiniz.

 

[ottoman71]

Verdiğiniz bilgi için teşekkur ederim. Sn Korhan Ayhan.
Listbox hakkında bir bilgi daha edinmiş oldum.
Söylediğiniz SpreadSheet nesnesine bakacağım.
İyi çalışmalar.