Excel VBA：文字列置換のReplaceメソッドの使い方｜空白・改行の削除

Replaceメソッドの構文

Range オブジェクト式.Replace(What, Replacement, LookAt, SearchOrder, MatchCase,MatchByte, SearchFormat, ReplaceFormat)

・引数

• What （必須）バリアント型 (Variant)： 検索する文字列を指定
• Replacement （必須）バリアント型 (Variant)： 置き換える文字列を指定
• LookAt （省略可）バリアント型 (Variant)： 使用できる定数は、XlLookAt クラスの 完全に同一なセルだけを検索（xlWhole）か 一部分でも一致するセルの検索（xlPart）
• SearchOrder （省略可）バリアント型 (Variant)： 使用できる定数は、XlSearchOrder クラスの 行方向に検索する（xlByRows）か 列方向に検索する（xlByColumns）
• MatchCase （省略可）バリアント型 (Variant)： 大文字と小文字を区別し検索するには、True を指定
• MatchByte （省略可）バリアント型 (Variant)： Excel で 2 バイト (全角) 文字の言語サポートが選択またはインストールされている場合にだけ使用できる。2バイト文字とだけ一致するようにする場合は、Trueを指定
• SearchFormat （省略可）バリアント型 (Variant)： メソッドの検索書式を指定
• ReplaceFormat （省略可）バリアント型 (Variant)： メソッドの置換書式を指定

・戻り値

ブール型 (Boolean)が返ります。

テストした結果では、常にTrueが返りました。

Option Explicit

Private Sub CommandButton1_Click()
    If Range("F2") = "" Then
        MsgBox "置き換え元を入力してください。"
        Exit Sub
    End If
    
    If Range("F3") = "" Then
        MsgBox "置き換え文字を入力してください。"
        Exit Sub
    End If
    
      
    '置き換え実行
    Range("B1:B1000").Replace what:=Range("F2"), replacement:=Range("F3")

End Sub