[quote]Nigdy się nie bawiłem z multiselectem i sam jestem ciekaw jaki jest najprostszy sposób. Mój jest taki:
Range("B1").Clear Dim a AsByte For a = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(a) Then Range("B1") = Range("B1") & ListBox1.List(a) Next a
Dolaczam sie pytaniem :) Gdzie nalezy wpisac powyzszy kod?? Jestem total green:| Administracja serwisu prosi o poprawienie znaczników [qoute]
napisał: baku postów: 26
umieszczony: 8 listopada 2006 09:28
Ślicznie Panom dziękuję!:)
Pozdrawiam
Jakub
napisał: Trebor postów: 1209
umieszczony: 7 listopada 2006 18:32
Nigdy się nie bawiłem z multiselectem i sam jestem ciekaw jaki jest najprostszy sposób. Mój jest taki:
Range("B1").Clear Dim a AsByte For a = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(a) Then Range("B1") = Range("B1") & ListBox1.List(a) Next a
Pozdrawiam
napisał: baku postów: 26
umieszczony: 7 listopada 2006 15:50
Witam,
Chciałbym, aby po zaznaczeniu kilku pól z listboksu,
np w komórce a1 występował połączony string z wartości zaznaczonych odpowiedzi.
Za pomoc w tej materii będę wdzięczny.
Pozdrawiam.
Jakub
wstecz 1 dalej
otwarty rozpoczął: baku
postów: 5
