search for a string in an array

I have an array of strings
now I want to search  the array for a specific string or a part of a string. I just want to know where in the array the string is.

thanks in advance
n96radsbAsked:
Who is Participating?
 
JR2003Connect With a Mentor Commented:
Private Sub Command1_Click()
    Dim i As Long
    Dim MyArray As Variant
    MyArray = Array("asd", "qwe", "xyz", "asd", "dfgxyzasd")
    For i = LBound(MyArray) To UBound(MyArray)
        If InStr(MyArray(i), "xyz") > 0 Then
            MsgBox "Element " & i & " contains the string"
        End If
    Next i
End Sub

0
 
rajaloysiousCommented:
     Dim listItems(4) As String
      Dim searchstr As String
      Dim bFound As Boolean
     
      searchstr = "Fou"
      Dim anItem As Variant
      listItems = Array("One", "Two", _
         "Three", "Four", "Five")
      List1.Clear
      bFound = False
      For Each anItem In listItems
         If InStr(1, anItem, searchstr) Then
            bFound = True
            Exit For
         End If
         bFound = False
      Next
    If bFound Then
        MsgBox "Found"
    Else
        MsgBox " Not found"
    End If
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.