VBAで文字列内の文字列の位置を検索する方法

2年 ago
夏樹, 風
1 minute

VBAではInStr関数を使って文字列の中に文字や部分文字列がある位置を検索できます。この関数は文字や部分文字列が最初に見つかった場所を表す整数値を返します。

サンプルコードを以下に示します。

Sub FindStringPosition()
    Dim str As String
    Dim searchChar As String
    Dim position As Integer
    
    str = "Hello, World!"
    searchChar = "o"
    
    position = InStr(str, searchChar)
    
    If position > 0 Then
        MsgBox "The character '" & searchChar & "' is found at position " & position & "."
    Else
        MsgBox "The character '" & searchChar & "' is not found in the string."
    End If
End Sub

このコードでは、文字列strと検索文字searchCharを定義します。そして、InStr関数を使用してsearchCharが最初に現れる位置を検索し、position変数に結果を格納します。最後に、positionの値に基づいて、文字が見つかったかどうか、見つかった場合の位置を表示するメッセージボックスがポップアップ表示されます。

文字列内で文字や部分文字列の位置を調べるにはニーズに合わせてコードをカスタマイズすれば良い、単純な例です。

bannerAds