Выделенные в списке значения

Время создания: 16.03.2019 23:43

Текстовые метки: VBA, Form, Controls, ItemsSelected, ListCount, ListBox

Раздел: Разные закладки - VBA - Excel - Shapes

Запись: xintrea/mytetra_db_adgaver_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.65