VBA代码解决方案第九讲：利用VBA代码替换单元格内字符串

《VBA代码解决方案》(版权10028096)这套教程是我最早推出的教程，目前已经是第三版修订了。这套教程定位于入门后的提高，在学习这套教程过程中，侧重点是要理解及掌握我的“积木编程”思想。要灵活运用教程中的实例像搭积木一样把自己喜欢的代码摆好。

这套教程共三册，一百四十七讲，内容覆盖较广，也是初级和中级间的过渡教程，改版后的内容主要是提供程序源码文件及代码修正为32位和64位兼用代码。今后一段时间会给大家陆续推出。今日的内容是VBA代码解决方案第九讲：利用VBA代码替换单元格内字符串

【分享成果，随喜正能量】就这么一辈子，欲望，就像手中的沙子，握得越紧，失去得越多。学会放手，甘愿舍弃，才能真正地得到。得与失，只是相对而言；认为得到时，或许正在失去；觉得失去时，也许正在得到。无意于得，就无所谓失。。

第九讲 利用VBA代码替换单元格内字符串

在VBA代码解决方案中，有各种实例的利用，这些实例很多是职场工作中的场景，大家完全可以利用我文章中的代码，把这些稍微的修正一下，适合自己的工作环境就可以了。今后还会陆续的给大家推出，争取每讲都给大家解决一种问题，让大家在看代码的过程中可以了解到VBA代码的实战例子，把VBA应用到自己的实际工作中，解决自己的实际问题，提高自己的工作效率。

之前给大家讲了查找的内容，利用的是Find及其他的方法，今日给大家讲解的是单元格内容的替换。

1 Replace方法

在VBA代码中，如果需要替换单元格内指定的字符串，那么可以使用Range对象的Replace方法。Replace也是EXCEL函数，今日给大家讲的是此函数在VBA中的利用。

在VBA中此函数的应用非常的广泛，应用于Range对象的Replace方法可以替换指定区域内单元格中的字符。

语法如下：

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

参数讲解：

1）expression是必需的，返回一个Range对象。

2）What 必需，数据类型：Variant，是Microsoft Excel 要搜索的字符串。

3）Replacement必需，数据类型：Variant 是替换字符串。

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

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

6）MatchCase可选，数据类型：Variant 如果为 True ，则搜索区分大小写。

7）MatchByte可选，数据类型：Variant 只有在 Microsoft Excel 中选择或安装了双字节语言时，才能使用此参数。如果为 True ，则双字节字符只与双字节字符匹配。如果为 False ，则双字节字符可与其对等的单字节字符匹配。

9）SearchFormat 可选，数据类型：Variant 该方法的搜索格式。

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

2 利用VBA代码替换单元格内字符串的代码及代码解读

下面我们要看下面的实例了：

如下面的代码所示。

Sub mynz_9() '9 利用VBA代码替换单元格内字符串

Sheets('9').Select

Range('A1:A5').Replace '你好', '您好'

End Sub

代码解析：

上述过程将工作表A1:A5单元格中的“你好”字符串替换成“您好”字符串。

下面的代码截图：

代码运行前：

代码运行后：

今日内容回向：

1 expression.Replace 方法的意义是什么？

2 expression.Replace 方法有哪些实际应用？

本讲内容参考程序文件：VBA代码解决方案（1-19）.xlsm

我20多年的VBA实践经验，全部浓缩在下面的各个教程中：