ListBox çoklu seçim

[soykan]

Merhabalar,

ListBox'ım 10 sütundan oluşuyor ben 6. sütundaki veriyi getirmesini istiyorum.

ColumnCount=10
BoundColumn=6 dediğimde sorun yok. Ancak ben aynı zamanda

Liststyle= 1-fmListStyleOption
MultiSelect=1-fmMultiSelectMulti olarak seçiyorum o zaman 1. kolonumda ne varsa onu getiriyor. BoundColumn=6 yı dikkate almıyor. 6. kolondaki işaretlediğim verileri nası getirebilirim ?

teşekkürler

 

[Korhan Ayhan]

Merhaba,

Aşağıdaki gibi denermisiniz.

ListBox1.List(ListBox1.ListIndex , 5).Value

 

[soykan]

Bu kodu
Sayfa1.Cells(satir, 2) = ListBox1.List(ListBox1.ListIndex, 5).Value

bu şekilde yazdım hata alıyorum.

Teşekkürler

 

[Korhan Ayhan]

Merhaba,

Örnek dosya eklerseniz daha hızlı sonuca gidebiliriz.

 

[hımmmmmmmm]

baundcolum 6 yazınca

listbox1.text ilk sütun değerini alır
listbox1.value 6 sütün değerini alır.

işini görürmü bilmiyorum.

 

[Korhan Ayhan]

Ekteki örnek dosyayı inceleyiniz. Kendinize göre uyarlarsınız.

 

[soykan]

Korhan bey çok teşekkürler elinize sağlık, aşağıdaki gini makromu düzenledim çalışıyor. Ancak benim burada çoklu seçimden kastım iki üç farklı 6. kolondaki datayı alt alta getirmesi o ise en son seçimi birden fazla getirmiş oluyor.
Sayfa1.Cells(satir, 2) = ListBox1.List(ListBox1.ListIndex, 5)