MyTetra Share
Делитесь знаниями!
Выделенные в списке значения
Время создания: 16.03.2019 23:43
Текстовые метки: VBA,Form,Control,ItemsSelected,ListCount,ListBox
Раздел: !Закладки - VBA - Excel - Shapes

Как вытащить в среду 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.53
Яндекс индекс цитирования