Vba: "셀에 다음이 포함된 경우"에 대한 간단한 공식

다음 기본 구문을 사용하여 VBA에서 “셀에 다음이 포함된 경우”에 대한 수식을 사용할 수 있습니다.

 Sub IfContains()
    Dim i As Integer

    For i = 2 To 8
        If InStr(1, LCase(Range(" A " & i)), " turtle ") <> 0 Then
        Result = " Contains Turtle "
        Else
        Result = “ Does Not Contain Turtle ”
        End If
    Range(" B " & i) = Result
    Next i
End Sub

이 특정 예에서는 A2:A8 범위의 각 셀에 “거북이”가 포함되어 있는지 확인한 다음 B2:B8 범위의 일치하는 각 셀에 “거북이 포함” 또는 “거북이 포함 안 함”을 할당합니다.

참고 : Instr 메소드는 문자열에 다른 문자열이 포함되어 있는지 확인하고 LCase 메소드는 대소문자를 구분하지 않고 검색을 수행하기 위해 텍스트를 소문자로 변환합니다.

다음 예에서는 실제로 이 구문을 사용하는 방법을 보여줍니다.

예: VBA에서 “셀에 다음이 포함된 경우”를 사용하는 방법

Excel에 각각 다른 텍스트를 포함하는 다음과 같은 셀 목록이 있다고 가정합니다.

A2:A8 범위의 각 셀에 “turtle”이라는 텍스트가 포함되어 있는지 확인하고 B2:B8 범위의 해당 셀에 결과를 표시한다고 가정합니다.

이를 위해 다음 매크로를 생성할 수 있습니다:

 Sub IfContains()
    Dim i As Integer

    For i = 2 To 8
        If InStr(1, LCase(Range(" A " & i)), " turtle ") <> 0 Then
        Result = " Contains Turtle "
        Else
        Result = “ Does Not Contain Turtle ”
        End If
    Range(" B " & i) = Result
    Next i
End Sub

이 매크로를 실행하면 다음과 같은 출력이 나타납니다.

B열은 A열의 해당 셀에 텍스트 어딘가에 “거북이”가 포함되어 있는지 여부를 알려줍니다.

참고 : VBA Instr 메소드에 대한 전체 문서는 여기에서 찾을 수 있습니다.

추가 리소스

다음 자습서에서는 VBA에서 다른 일반적인 작업을 수행하는 방법을 설명합니다.

VBA: 문자열에서 문자 발생 횟수를 계산하는 방법
VBA:문자열에 다른 문자열이 포함되어 있는지 확인하는 방법