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

文字列：文字列の一部を別の文字列で置換（Replace 関数）

2015/05/08

Replace 関数の使い方

【書式】

result = Replace ( string, find, replace [, start, count, compare ] )

引数・戻り値

string ・・・任意の文字列・文字列式を指定します（置換する文字列を含む）。
find ・・・検索する文字列を指定します。
replace ・・・置換する文字列を指定します。
start ・・・引数 string 内で、文字列 find の検索を開始する位置をしていします。左端の文字を「1」とします。省略すると「1」が使用されます。
count ・・・置換する文字列の回数を指定します。「-1」を指定するとすべての候補が置換されます。省略すると「-1」が使用されます。
compare ・・・文字列を比較するときの比較モードを指定します。（設定する値は、下表「compare の設定値」を参照）

result ・・・引数 string の中で、start の位置以降で、find を replace で、count で指定された回数分（ count が「-1」の場合はすべて）置換した結果（文字列型：String）。

【Replace 関数の戻り値について】

条件	戻り値
引数 strong が長さ０の文字列(“”)	長さ０の文字列(“”)
引数 strong が Null 値を含む	エラー
引数 find が長さ０の文字列(“”)	引数 strong のコピー
引数 start が、引数 string の文字数より大きい場合	長さ０の文字列(“”)
引数 count が 0 の場合	引数 strong のコピー

compare の設定値

値	定数	内容
-1	vbUseCompareOption	Option Compare ステートメントの設定を使用して比較
0	vbBinaryCompare	バイナリモードで比較（規定値）
1	vbTextCompare	テキストモードで比較
2	vbDatabaseCompare	Microsoft Access の場合のみ有効

Replace 関数の使用例

サンプルVBAソース

　
Sub Sample_Replace()

    Dim str1 As String, str2 As String, str3 As String
    
    str1 = "エクセルは、マイクロソフトが、Windows や Mac 向けに販売しているソフトです。" & _
           "エクセルを使って様々な作業を行っています。エクセルの基本操作は必須です。"

    str2 = Replace(str1, "ソフト", "ビジネスソフト", 16)
    
    str3 = Replace(str1, "エクセル", "ワード", 1, 2, vbTextCompare)
    
    
    Debug.Print str1
    
    Debug.Print str2
    
    Debug.Print str3


End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

　

Sub Sample_Replace()

Dim str1 As String, str2 As String, str3 As String

str1 = "エクセルは、マイクロソフトが、Windows や Mac 向けに販売しているソフトです。" & _

"エクセルを使って様々な作業を行っています。エクセルの基本操作は必須です。"

str2 = Replace(str1, "ソフト", "ビジネスソフト", 16)

str3 = Replace(str1, "エクセル", "ワード", 1, 2, vbTextCompare)

Debug.Print str1

Debug.Print str2

Debug.Print str3

End Sub

　

実行結果

- VBA基本 Replace 関数, VBA基本, エクセルVBA, 置換

Tweet

Message コメントをキャンセル

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

関連記事

: 指定したセル範囲のサイズを変更（Resize プロパティ）

Resize プロパティ指定したセル範囲のサイズ（行数や列数）を変更します。 …

: 対象のオブジェクトをクリアする（Clear メソッド）

Clear メソッド対象となるオブジェクト全体をクリアします。Range オブ …

: 配列の要素数を取得する（UBound 関数・LBound 関数）

UBound 関数・LBound 関数【書式】 result = UBound …

: VBA の演算子（比較演算子）

比較演算子比較演算子による演算の結果は「真」の場合は「True」、「偽」の場合 …

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

IsEmpty 関数の使い方【書式】 result = IsEmpty ( e …

: 乱数ジェネレータを初期化 (乱数系列を再設定) する（Randomize ステートメント）

Randomize ステートメントの使い方 Rnd 関数を使用する前に使用しま …

: 指定した値を8進数で表記した文字列に変換する（Oct 関数）

Oct 関数の使い方【書式】 result = Oct ( expressi …

: VBA の演算子（算術演算子）

算術演算子算術演算を行うときに使用する演算子です。 ^（べき乗）、*（積）、/ …

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

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

: 指定した値を16進数で表記した文字列に変換する（Hex 関数）

Hex 関数の使い方【書式】 result = Hex ( expressi …

PREV: 文字列：文字列の空白を削除（Trim 関数, LTrim関数, RTrim関数）
NEXT: 文字列：指定した文字コードに対応する文字を返す（Chr 関数）