자주 쓰는 VBA 패턴 (1) - 찾는 값이 배열 안에 있는지 확인

파이썬에서는 va in list 형태의 명령어로 특정 값이 리스트에 있는지 확인할 수 있다.

 

아래의 코드는 vba에는 파이썬과 같은 리스트 자료형 없다. 배열에서 va in list와 같은 형태의 명령을 사용하기 위해 만든 함수이다.

 

Function IsInArray(stringToBeFound As String, arr As Variant) As Boolean
    Dim i
    For i = LBound(arr) To UBound(arr)
        If arr(i) = stringToBeFound Then
            IsInArray = True
            Exit Function
        End If
    Next i
    IsInArray = False

End Function