Ecel VBA编程 替换数据.docxVIP

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