Excel VBA教程:Replace方法

应用于 Range对象的 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 的设置都将保存。如果下一次调用此方法时未指定这些参数,则将使用保存的值。设置这些参数将更改“查找和替换”对话框中的设置,而在“查找和替换”对话框中更改相应设置,也将更改忽略这些参数时所使用的保存值。若要避免出现问题,每次调用本方法时,请明确设置这些参数。

应用于 WorksheetFunction对象的 Replace方法。

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

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

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

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

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

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

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

Excel VBA教程:Replace方法·示例

应用于 Range对象。

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


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

应用于 WorksheetFunction对象。

本示例用“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

上页:Excel VBA教程:Repeat方法 下页:Excel VBA教程:ReplaceNode方法

Excel VBA教程:Replace方法

Excel VBA教程:ReplaceNode方法 Excel VBA教程:获取有关 Macintosh 关键字的帮助
Excel VBA教程:获取有关 Macintosh 关键字的帮助 Excel VBA教程:ReplyWithChanges方法
Excel VBA教程:RerouteConnections方法 Excel VBA教程:Reset方法
Excel VBA教程:ResetAllPageBreaks方法 Excel VBA教程:ResetColors方法
Excel VBA教程:ResetRotation方法 Excel VBA教程:ResetTimer方法
Excel VBA教程:RestartServers方法 Excel VBA教程:Route方法
Excel VBA教程:RowDifferences方法 Excel VBA教程:RTD方法
Excel VBA教程:Run方法 Excel VBA教程:RunAutoMacros方法
Excel VBA教程:Save方法 Excel VBA教程:SaveAs方法
Excel VBA教程:SaveAsODC方法 Excel VBA教程:SaveCopyAs方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号