原标题：VBA常用小代码101：批量改变單元格的格式什么更改部分字符格式

有个朋友问能不能批量将单元格的格式什么更改中的部分字符改变格式比如改变字体，字号改变顏色……

举个例子，如下图所示将“领导”两个字……字体变成15号，加粗且变成红色……

干了这碗毒鸡汤天黑就闭眼……

'ExcelHome技术论坛VBA编程学习与实践：看见星光

s = "领导"'需要改变格式的字符串

'查找变量s在arr(i,1)中首次出现的位置，不区分字母大小写

Do While L'如果l不为0也就是存在s的话那么……

'寻找变量s下一个出现的位置

start是可选参数。为数值表达式设置每次搜索的起点。如果省略将从第一个字符的位置开始。如果指定了 compare 参數则一定要有 start 参数，例如本例小代码

string1是必要参数。接受搜索的字符串表达式

string2是必要参数。被搜索的字符串表达式

Compare可选参数。指定芓符串比较简单理解，如果省略则区分字母大小写如果指定参数为vbTextCompare则忽略字母大小写。

3坦白的说，Excel 和VBA处理这类问题的效率并不高即便搭配正则，效率同样还是不高处理这类问题最高效的方法是——找隔壁老王Word呀，它才是文档排版的绝对高手——点击阅读原文获取Word解决方案