Excel365 VBAのInStr関数を使って文字列の位置を簡単に探す方法

こんにちは！今日はExcel365のVBAで使える「InStr（インストラ）」関数について、初心者の方にもわかりやすく解説します。パソコンやスマホの操作に自信がない方でも、安心して学べる内容ですので、ぜひ最後までご覧ください。

InStr関数とは？
InStr関数の基本的な使い方
実際に使ってみよう！基本例
検索を開始する位置を指定する
大文字と小文字を区別しない検索
文字列が含まれているかを調べる
よくある質問や疑問
今すぐ解決したい！どうしたらいい？
まとめ

InStr関数とは？

Excelのイメージ

まず、InStr関数とは、指定した文字列の中から、別の文字列が最初に現れる位置を調べるVBAの関数です。例えば、「Excel365の使い方」という文章の中で、「使い方」が何番目に出てくるかを調べることができます。

InStr関数の基本的な使い方

InStr関数の書き方は次の通りです

InStr, 検索対象文字列, 検索する文字列, )

開始位置（省略可能）検索を始める位置を指定します。省略すると1から始まります。
検索対象文字列検索を行う元の文字列です。
検索する文字列検索したい文字列です。
比較方法（省略可能）検索時の比較方法を指定します。省略するとバイナリ比較（大文字と小文字を区別）になります。

実際に使ってみよう！基本例

例えば、「Excel365の使い方」という文字列の中で、「使い方」が何番目に出てくるかを調べるコードは以下のようになります

Sub 使い方の位置を調べる()

    Dim 位置 As Integer

    位置 = InStr(1, "Excel365の使い方", "使い方")

    MsgBox "「使い方」は" & 位置 & "番目にあります。"

End Sub

このコードを実行すると、「使い方は7番目にあります。」と表示されます。

検索を開始する位置を指定する

検索を始める位置を指定することもできます。例えば、3番目の文字から検索を始める場合は、次のように書きます

Sub 開始位置を指定する()

    Dim 位置 As Integer

    位置 = InStr(3, "Excel365の使い方", "使い方")

    MsgBox "「使い方」は" & 位置 & "番目にあります。"

End Sub

このコードでは、最初の「Excel365」をスキップして、2番目の「使い方」を見つけます。

大文字と小文字を区別しない検索

デフォルトでは、InStr関数は大文字と小文字を区別して検索します。しかし、区別せずに検索したい場合は、比較方法を「vbTextCompare」に設定します

Sub 大文字小文字を区別しない()

    Dim 位置 As Integer

    位置 = InStr(1, "Excel365の使い方", "使い方", vbTextCompare)

    MsgBox "「使い方」は" & 位置 & "番目にあります。"

End Sub

これで、「使い方」や「使い方」など、大文字小文字を区別せずに検索できます。

文字列が含まれているかを調べる

文字列が含まれているかを調べるには、InStr関数の戻り値が0より大きいかどうかで判断できます

Sub 文字列が含まれているか()

    Dim 位置 As Integer

    位置 = InStr(1, "Excel365の使い方", "使い方")

    If 位置 > 0 Then

        MsgBox "「使い方」が含まれています。"

    Else

        MsgBox "「使い方」は含まれていません。"

    End If

End Sub

このコードでは、「使い方」が含まれていれば「含まれています。」と表示されます。