文字列を置換・検索する関数 | EXCEL(エクセル)-VBA・マクロ

文字列の置換・検索のVBA関数

Replace関数

指定された文字列の一部を、別の文字列で指定された回数分で置換した文字列を返します。

構文：Replace(expression, find, replace[, start[, count[, compare]]])

expression：置換対象の文字列を指定。。
find：検索する文字列を指定。
replace：置換する文字列を指定。
start：省略可能。検索を開始する位置を指定。
count：省略可能。置換する回数を指定。省略するとすべて置換されます。
compare：省略可能。文字列比較のモードを指定。


Range("A1").Value = Replace("　A　B　C　", "　", "")
Range("B1").Value = Replace("　A　B　C　", "　", "", 1, 2)

実行結果

	A
1	ABC
2	AB　C

InStr関数

文字列を検索し、最初に見つかった文字位置を返します。

構文：InStr([start, ]string1, string2[, compare])

start：検索を開始する位置を指定。省略時は先頭から。
string1：検索対象の文字列を指定。。
string2：検索する文字列を指定。。
compare：省略可能。文字列比較のモードを指定。 compareがNull値の場合は、エラーが発生します。
compareを指定した場合は、引数startも指定する必要があります。
省略すると、Option Compare ステートメントの設定に応じて、比較モードが決まります。ローカル固有の比較ルールを使用するには、有効なLCID (LocaleID) を指定します。


Range("A1").Value = InStr("あいうえおかきくけこ", "か")
Range("A2").Value = InStr(1, "あいうえおあいうえお", "あ")
Range("A3").Value = InStr(2, "あいうえおあいうえお", "あ")

実行結果

	A
1	6
2	1
3	6

InStrRev関数

最後の文字位置から検索を開始し、最初に見つかった先頭からの文字位置を返します。

構文：InStrRev(string1, string2[, start, compare])

string1：検索対象の文字列を指定。。
string2：検索する文字列を指定。。
start：検索を開始する位置を指定。省略時は先頭から。
compare：省略可能。文字列比較のモードを指定。 compare を省略すると、バイナリモードで比較が行われます。


Range("A1").Value = InStrRev("あいうえおかきくけこ", "か")
Range("A2").Value = InStrRev("あいうえおあいうえお", "あ", 1)
Range("A3").Value = InStrRev("あいうえおあいうえお", "あ", 2)

実行結果

	A
1	6
2	1
3	1

文字列比較モードの定数

定数	説明
vbBinaryCompare	バイナリモードで比較。
vbDatabaseCompare	データベースモードで比較。
vbTextCompare	テキストモードで比較。

書籍 IT系資格統計解析データ分析マーケティング