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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: Join 関数（配列の要素を結合）

Join 関数 1次元配列の各要素を指定した区切り文字で連結します。【書式】 …

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

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

: 指定した数のスペースを挿入する（Spc 関数）

指定した数のスペースを挿入指定した数のスペースを挿入するには、Spc 関数を使 …

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

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

: 書式を変換（Format 関数）

Format 関数の使い方【書式】 result = Format ( exp …

: ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（Partition 関数）

Partition 関数の使い方 Partition 関数は、ある数値が、区切 …

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

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

: 画面の更新を停止（ScreenUpdating プロパティ）

画面の更新を停止マクロを実行すると、画面が更新されます。これにより、実行速度が …

: 配列の添字の最小値を「1」に設定する

Option Base ステートメントを使用する【書式】 Option Bas …

: xlFileFormat 列挙型

xlFileFormat 列挙型 Workbook.SaveAs メソッドの引 …

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