Excel VBA编程  替换数据
Excel VBA的替换功能可以将查到的文字替换为指定内容，从而更有效的修改文档。本节介绍如何使用VBA中的Replace方法，替换单元格中的指定数据。
语法：表达式.Replace(What, Replacement, LookAt, SearchOrder, MatchCase, MatchByte, SearchFormat, ReplaceFormat)
其中，Replace方法的参数功能如表16-2所示。
表16-2  Replace参数功能表
参数名称
可选/必选
功能
vba编程技巧
What
必选
指定要搜索的字符串。
Replacement
必选
表示要替换字符串。
LookAt
可选
可以为以下XlLookAt常量之一：xlWhole或xlPart。
SearchOrder
可选
可为以下XlSearchOrder常量之一：xlByRows或xlByColumns。
MatchCase
可选
如果为True，则搜索区分大小写。
MatchByte
可选
如果为True，则双字节字符只与双字节字符匹配。如果为False，则双字节字符可与其对等的单字节字符匹配。
SearchFormat
可选
表示该方法的搜索格式。
ReplaceFormat
可选
表示该方法的替换格式。
注  意
每次使用此方法后，参数LookAt、SearchOrder、MatchCase 和 MatchByte 的设置都将被保存。如果下次调用此方法时不指定这些参数的值，就使用保存的值。要避免出现这一问题，每次使用此方法时请明确设置这些参数。
例如，将表格中的所有“北区”文字替换为“北关区”文字。替换所进行的区域为工作表Sheet1中的A列，其代码如下
Sub 替换数据()
Worksheets("Sheet1").Columns("A").Replace _
    What:="北区", Replacement:="北关区", _
    SearchOrder:=xlByColumns, MatchCase:=True
End Sub
运行上面的代码，即可将工作表中的“北区”文字替换为“北关区”文字，效果如图16-3所示。
图16-3  替换数据

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。