Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 188
  • Last Modified:

Listview Question

I have a listview on a form - I can count the number of selected items asing the following code

        Dim li As ListItem
        Dim i As Long
       
        For Each li In ListView1.ListItems
            If li.Selected Then
                Debug.Print li.Index & " is selected" & vbCrLf
               
            End If
        Next

What I would now like to do is get the text in column 3 for each item selected and store it into an array - then reference each entry in the array passing it to another function

If you require any clarification please ask

DWE
0
DWE
Asked:
DWE
1 Solution
 
ArkCommented:
Dim li As ListItem
Dim i As Long
Dim SSubValue() As String
Dim n As Long

Redim SSUbValue(0)

ReDim Preserve SSubValues(ListView.ListItems.Count)
For Each li In ListView1.ListItems
    If li.Selected Then
       n = n + 1
       SSubValues(n) = li.SSubItems(3)
    End If
Next

Now, you have access to every array item by ListView.ListIndex var


Cheers
0
 
DWEAuthor Commented:
A couple of typos but an excellent answer

Thanks Ark

DWE
0

Featured Post

[Webinar On Demand] Database Backup and Recovery

Does your company store data on premises, off site, in the cloud, or a combination of these? If you answered “yes”, you need a data backup recovery plan that fits each and every platform. Watch now as as Percona teaches us how to build agile data backup recovery plan.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now