엑셀 2013 VBA처럼 조건은 gettxt의

Question

값 = 'ATCH 6 작동하지 않습니다.

다음과 같은 조건이 충족되지 않습니다. 그럼 ... 좋아요 문을 해결하는 방법에

제안 부탁드립니다 : LCase 함수 (gettxt)처럼이 "* ATCH 번호 *"이 경우

.

Answer 1

콜론 뒤에 "*"가 하나 더 누락되었습니다. 조건에는 콜론 뒤에 아무 것도 없어야하지만 "gettxt"값에는 그 뒤에 뭔가가 들어 있다고 나와 있습니다. 그래서 정확한 조건은 다음과 같아야합니다

If LCase(gettxt) Like "*atch #*:*" Then 

전체 작업 버전이 도움이

Sub test() 

gettxt = "ATCH 6: Page 2 of 2" 

If LCase(gettxt) Like "*atch #:*" Then 
    Debug.Print "Working!" 
Else 
    Debug.Print "Not Working!" 
End If 

End Sub 

희망!