Replace 方法

返回 Boolean 类型，指示指定区域内单元格中的字符。使用本方法并不会更改选定区域或活动单元格。

expression.Replace(What, Replacement, LookAt, SearchOrder, MatchCase, MatchByte, SearchFormat, ReplaceFormat)

expression 必需。该表达式返回一个 Range 对象。

What Variant 类型，必需。Microsoft Excel 要搜索的字符串。

Replacement Variant 类型，必需。替换字符串。

LookAt Variant 类型，可选。可为以下 XlLookAt 常量之一：xlWhole 或 xlPart。

SearchOrder Variant 类型，可选。可为以下 XlSearchOrder 常量之一：xlByRows 或 xlByColumns。

MatchCase Variant 类型，可选。如果为 True，则进行区分大小写的搜索。

MatchByte Variant 类型，可选。只有当在 Microsoft Excel 中选择或安装了双字节语言支持时，才可以使用本参数。如果为 True，则使双字节字符仅匹配双字节字符。如果为 False，则双字节字符可匹配其等价的单字节字符。

SearchFormat Variant 类型，可选。该方法的搜索格式。

ReplaceFormat Variant 类型，可选。该方法的替换格式。

说明

每次调用本方法后，参数 LookAt、SearchOrder、MatchCase 和 MatchByte 的设置都将保存。如果下一次调用此方法时未指定这些参数，则将使用保存的值。设置这些参数将更改“查找和替换”对话框中的设置，而在“查找和替换”对话框中更改相应设置，也将更改忽略这些参数时所使用的保存值。若要避免出现问题，每次调用本方法时，请明确设置这些参数。

根据指定的字符数，将文本字符串的部分用其他文本字符串替换。

expression.Replace(Arg1, Arg2, Arg3, Arg4)

expression 必需。该表达式返回一个 WorksheetFunction 对象。

Arg1 String 类型，必需。要替换其中某些字符的文本。

Arg2 Double 类型，必需。在 Arg1 中用 Arg4 替换的字符的位置。

Arg3 Double 类型，必需。在 Arg1 中使用 Replace 方法以 Arg4 替换的字符的数量。

Arg4 String 类型，必需。用以替换 Arg1 中字符的文本。

示例

本示例将每个“SIN”三角函数都替换为“COS”函数。替换所进行的区域为工作表 Sheet1 中的 A 列。

Worksheets("Sheet1").Columns("A").Replace _
    What:="SIN", Replacement:="COS", _
    SearchOrder:=xlByColumns, MatchCase:=True

本示例用“ac-ef”替换“abcdef”，并在该过程中通知用户。

Sub UseReplace()

    Dim strCurrent As String
    Dim strReplaced As String

    strCurrent = "abcdef"

    ' Notify user and display current string.
    MsgBox "The current string is: " & strCurrent

    ' Replace "cd" with "-".
    strReplaced = Application.WorksheetFunction.Replace _
        (Arg1:=strCurrent, Arg2:=3, _
        Arg3:=2, Arg4:="-")

    ' Notify user and display replaced string.
    MsgBox "The replaced string is: " & strReplaced

End Sub