Dim pos 'ABCDからCDを検索する。この場合、posの中身は 3(文字列の開始位置) pos = InStr("ABCD", "CD") 'ABCDからEFを検索する。この場合、posの中身は 0(一致文字列なし) pos = InStr("ABCD", "EF")