728x90

영어 검색어인 경우에는 asterisk 가 들어간 검색어가 될 수도 있다.

DB에 SQL 로 접속할 경우, 관련 자료가 하나도 없다고 결과를 돌려줄 수도 있다.

이럴 경우에는

    Keyword = Application.InputBox("검색 키워드를 입력하세요", "검색어", Type:=2)
    If InStr(Keyword, "'") > 0 Then    '// 영어 검색어에는 asterisk 가 포함되어 있을 수 있으므로
        Keyword = Replace(Keyword, "'", "\'")
    End If

와 같이 처리해주면 된다.

블로그 이미지

Link2Me

,