비주얼베이직(Visual Basic, VBA) 문자열내에 특정 문자, 문자열의 유무 확인하기(InStr, InstrRev)

비주얼베이직(Visual Basic, VBA) 문자열내에 특정 문자의 유무 확인하기(InStr, InstrRev)

비주얼베이직(Visual Basic, VBA) 문자열내에 특정 문자의 유무 확인하기(InStr, InstrRev)

앞선 포스팅에서는 문자열 내에 특정 문자의 위치를 알아보는 방법에 대해서 두가지 함수인 InStr, InstrRev를 통해서 알아봤습니다. 

비주얼베이직(Visual Basic, VBA) 문자열내에 특정 문자의 위치 확인하기(InStr, InstrRev)

비주얼베이직(Visual Basic, VBA) 문자열내에 특정 문자의 위치 확인하기(InStr, InstrRev)

이번 포스팅에서는 이 부분을 조금 더 활용하여, 문자열 내에 특정 문자가 존재하는지 여부를 확인하는 방법에 대해서 살펴보겠습니다. 

 

조금 먼저 힌트를 드리자면, 앞서서 InStr/InStrRev의 경우 특정 문자가 존재하지 않을 경우 0을 반환합니다. 이 부분과 앞서 포스팅에서 살펴봤던 분기문 중에 IF/Else 문을 이용하여 다음과 같이 예시를 구성해봤습니다. 

Private Sub Check_exist_in_str()
   Dim Var As String
   Var = "Hello Appia"
   If InStr(Var, "B") = 0 Then
     MsgBox ("B는 문자열 안에 존재하지 않습니다.")
   Else
     MsgBox ("B는 문자열 안에 존재합니다.")
   End If
End Sub

위의 예시를 실행하면 당연히 "B는 문자열 안에 존재하지 않습니다."라고 다음과 같이 메시지 박스에 명시가 될 것입니다.

예시 결과 

 

그럼 한글자가 아닌 여러글자일 경우에는 어떨까요? 그럴 경우을 대비해서 다음과 같이 예시를 구성해봤습니다. 

Private Sub Check_exist_in_str()
   Dim Var As String
   Var = "Hello Appia"
   If InStr(Var, "Ha") = 0 Then
     MsgBox ("Ha는 문자열 안에 존재하지 않습니다.")
   Else
     MsgBox ("Ha는 문자열 안에 존재합니다.")
   End If
End Sub

위의 경우에 동일하게 존재하지 않기 때문에 다음과 같은 메시지가 나타납니다. 

두글자 연속인 부분에 대해 존재 유무 확인 결과

H와a는 각각을 존재하지만, 붙여서 존재하지는 않습니다. 따라서 이 부분 H를 확인하고 그 다음 문자를 확인하는 구조입니다. 이와 같은 방법으로 문자열안에 특정 문자 또는 문자열이 존재하는지에 대해서 확인할 수가 있습니다. 물론, InStr과 InStrRev가 동일하게 사용하면 되기 떄문에 별도로 InStrRev의 예제는 첨부하지 않겠습니다. 

 

비주얼베이직(Visual Basic, VBA) 조건문, 분기문 살펴보기(if, elseif, else, switch)

비주얼베이직(Visual Basic, VBA) 조건문, 분기문 살펴보기(if, elseif, else, switch)

 

이번 포스팅에서는 비주얼베이직(Visual Basic, VBA) 문자열내에 특정 문자, 문자열의 유무 확인하기(InStr, InstrRev)라는 주제로 문자열 안에 특정 문자가 존재하는 지에 대해서 살펴봤습니다.