Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

文字列：文字列を最後から検索してその最初の文字位置を返す（InStrRev 関数）

2016/02/08

InStrRev 関数

任意の文字列の中で、指定した文字列を最後から検索して、見つかった場合、任意の文字列の先頭からの位置を返します。
任意の文字列の先頭から検索する場合は、InStr 関数・InstrB 関数 を使います（文字列：文字列を検索してその最初の文字位置を返す（InStr 関数,InStrB 関数）を参照）。

【書式】

result = InStrRev ( string1, string2 [, start, compare ] )

引数・戻り値

string1 ・・・検索対象の文字列・文字列式を指定します（省略不可）。
string2 ・・・引数 string1 内で、検索する文字列を指定します（省略不可）。
start ・・・検索の開始位置を指定します。省略すると -1 が使用され、最後の文字位置から検索を開始します。引数 start に Null 値が含まれると、エラーになります。
compare ・・・文字列式を評価するときに使用する文字列比較のモードを表す VbCompareMethod 列挙型の定数またはその値を指定します。省略すると、バイナリモード（vbBinaryCompare）で比較が行われます。

定数値内容

vbBinaryCompare 0 バイナリモードの比較

vbTextCompare 1 テキストモードの比較（大文字・小文字を同一視）

result ・・・ InStrRev 関数の戻り値。

内容	戻り値
string1 が長さ 0 の文字列 (“”) のとき	0
string1 が Null 値のとき	Null 値
string2 が長さ 0 の文字列 (“”) のとき	start
string2 が Null 値のとき	Null 値
string2 が見つからないとき	0
string2 が string1 内で見つかったとき	見つかった文字列の位置
start の値がstring2 の文字数より大きいとき	0

InStrRev 関数使用例

サンプルVBAソース

　
Sub sample_InStrRev()

    Dim str As String
    
    str = "ABCDEabcZZZ"
    
    Debug.Print InStrRev(str, "Z", -1, vbBinaryCompare)
    Debug.Print InStrRev(str, "Z", 9, vbBinaryCompare)
    Debug.Print InStrRev(str, "ABC", -1, vbTextCompare)
    Debug.Print InStrRev(str, "ABC")

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

　

Sub sample_InStrRev()

Dim str As String

str = "ABCDEabcZZZ"

Debug.Print InStrRev(str, "Z", -1, vbBinaryCompare)

Debug.Print InStrRev(str, "Z", 9, vbBinaryCompare)

Debug.Print InStrRev(str, "ABC", -1, vbTextCompare)

Debug.Print InStrRev(str, "ABC")

End Sub

　

実行結果

- VBA基本 InStrRev 関数, VBA基本, エクセルVBA

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 文字列：文字列変数内の一部を置き換える（Mid・MidB ステートメント）

Mid・MidB ステートメントの使い方【書式】 { Mid | MidB } …

: 変数のデータ型・宣言（Dim ステートメント）

変数の宣言一般的な方法【書式】 Dim varname [ As type, …

: 指定した数値を文字列に変換する（Str 関数）

Str 関数の使い方 Str 関数は、数値・数式を文字列に変換して返す関数です …

: データ型を調べて、そのデータ型を示す数値を返す（VarType 関数）

VarType 関数の使い方 VarType 関数は、引数に、データ型を調べた …

: 日付時刻：文字列から日付・時刻データを取得（ DateValue 関数、TimeValue 関数）

DateValue 関数（文字列から日付データを取得）【書式】 date_va …

: 変数が数値型かどうかをチェックする（ IsNumeric 関数）

IsNumeric 関数の使い方【書式】 result = IsNumeric …

: 文字列：文字列変数の値を右詰めまたは左詰めにする（RSet ステートメント・LSet ステートメント）

RSet ステートメント・LSet ステートメント【書式】＜ RSet ステ …

: ユーザー設定リストを使って並べ替える（Sort）

VBAでリスト、テーブルを並べ替える（Sort） VBAで、ソートを行うには、S …

: 日付時刻：数値から日付・時刻データを取得（ DateSerial 関数、TimeSerial 関数）

DateSerial 関数（数値を使って日付データを取得）【書式】 date …

: RGB 値一覧表（XlRgbColor 列挙型）

RGB 値（XlRgbColor 列挙型）一覧表 RGB 関数を使用して、出力さ …

PREV: ウィンドウの画面を構成する各要素の表示設定
NEXT: ユーザー定義定数（Const ステートメント）