Replace 関数

Replace(strString, strFind, strRep [, lngStart, lngCnt, lngCmp])

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

引数

strString

置換する文字列を含む文字列式を指定します。

strFind

検索する文字列を指定します。

strRep

置換する文字列を指定します。

lngStart

省略可能です。
検索開始位置を指定します。（省略すると先頭から検索開始します）
lngCnt と共に使用してください。

lngCnt

省略可能です。
置換する文字列数を指定します。（省略すると既定値の -1 が使用され、すべての候補が置換されます）
lngStart と共に使用してください。

lngCmp

省略可能です。
文字列比較のモードを指定します。（省略した場合はバイナリモードドで比較を行います）

定数	値	内容
vbBinaryCompare	0	バイナリモードで比較を行います。
vbTextCompare	1	テキストモードで比較を行います。

戻り値

条件	戻り値
strString が長さ 0 の文字列 ("") のとき	長さ 0 の文字列 ("")
strString が Null 値のとき	エラー
strFind が長さ 0 の文字列 ("") のとき	strString のコピー
strRep が長さ 0 の文字列 ("") のとき	strFind がすべて削除された expression のコピー
lngStart の値が strString の文字数より大きいとき	長さ 0 の文字列 ("")
strSearch が見つかったとき	文字列が見つかった位置
lngCnt が 0 のとき	strString のコピー

使用例

次のコードは、Replace 関数を使って文字列一部を別の文字列に置換します。

Dim strString
'文字列の最初から、バイナリ モードで比較を行います。"YXXYXXPXXY"を返します。
strString = Replace("pXXpXXPXXp", "p", "Y")
'4 番目の位置からテキスト モードで比較を行います。"pYXXYXXY" を返します。
strString = Replace("pXXpXXPXXp", "p", "Y", 4, -1, 1)