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

関連記事

: 文字列：指定した文字コードに対応する文字を返す（Chr 関数）

Chr 関数の使い方【書式】 result = Chr ( code ) 引数 …

: カレントフォルダの取得・設定（DefaultFilePath プロパティ）

DefaultFilePath プロパティカレントフォルダとは、ブックを開いた …

: Math 関数（ Abs,Atn,Cos,Exp,Log,Rnd,Sgn,Sin,Sqr,Tan ）

Abs 関数【書式】 value = Abs ( number ) 【引数・戻 …

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

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

: 取り消し線を設定する（Strikethrough プロパティ)

取り消し線を設定する（Strikethrough プロパティ) Striketh …

: XlThemeColor 列挙型

XlThemeColor 列挙定数値内容 xlThemeColorDark …

: ユーザー定義定数（Const ステートメント）

定数を使うユーザー定義の定数を使用するには、Const ステートメントを使って …

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

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

: コレクション（Collection）オブジェクト「連想配列」

コレクション（Collection）オブジェクトの使い方【書式】 Dim my …

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

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

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