MyTetra Share
Делитесь знаниями!
Выделенные в списке значения
Время создания: 16.03.2019 23:43
Текстовые метки: VBA, Form, Controls, ItemsSelected, ListCount, ListBox
Раздел: !Закладки - VBA - Excel - Shapes
Запись: adgaver/mytetra_base_New/master/base/1513310109ax52d0wq88/text.html на raw.githubusercontent.com

Как вытащить в среду VBA выбранные в списке значения при мультиселектном выделении


Обычно, это делается перебором всех значений и выбором тех, у которых Selected = true.
Пример:

With Me.ListBox1
        For i = 0 To .ListCount - 1
            If .Selected(i) Then
             ' тут код
            End If
        Next
End With

OkeTurel,
Dim varItm As Variant

        With Me.ListBox1
                For Each varItm In .ItemsSelected
                     Debug.Print .ItemData(varItm)
                Next varItm
        End With
Так же в этом разделе:
 
MyTetra Share v.0.55
Яндекс индекс цитирования