List Box multi values retrieval

[questionit]

I have a List Box with multi-select option = "Extended".

how can i retrieve all the values into a variable/array variable

i have tried but cant do like List4.Value(1) ..


help please

Thanks

[MikeTheBike]

Hi

I have a List Box with multi-select option = "Extended".

how can i retrieve all the values into a variable/array variable

i have tried but cant do like List4.Value(1) ..


help please

Thanks

If you want to load ALL the list (column 0) values into an arry then this

    Dim arry() As String
    Dim i As Integer
 
    With List4
        ReDim arry(.ListCount - 1)
        For i = 0 To .ListCount - 1
            arry(i) = .Column(0, i)
        Next i
    End With
 

If just the SELECTED items then this is one way

    Dim arry() As String
    Dim i As Integer
 
    With List4
        ReDim arry(.ListCount - 1)
        For i = 0 To .ListCount - 1
            If .Selected(i) Then
                ReDim Preserve arry(i)
                arry(i) = .Column(0, i)
            End If
        Next i
    End With
 

HTH

MTB