【VBA】指定の文字列が含まれているか判定｜InStr

' -----------------------------------------------------------------------
' 引数          : text:調査元テキスト/str:含まれているか確認する文字列
' -----------------------------------------------------------------------
Public Function StrExsistsInTxt( _
                                            ByVal text As String, _
                                            ByVal str As String) As Boolean
    StrExsistsInTxt = False
    If InStr(text, str) > 0 Then StrExsistsInTxt = True
End Function