在使用Excel处理文字信息时，为阅读方便，经常需要对单元格内某些特定文字批量标注颜色，使用Excel自带的查找替换功能是不行的哦，需要使用VBA。非常适合代码小白，
工具/原料
office2010
Excel
方法/步骤
1、打开代码界面：--打开Excel，右击当前sheet页名字，在弹出界面中，点击“查看代码（V）”，打开VBA代码编辑界面
2、粘贴代码（注意不用编写）：--将如下代码直接Cop鲻戟缒男y到打开的代码编写空白页，代码小白不要慌，按照批注说明修改2个参数，代码就编写完成了，代码如下：P鸡堕樱陨rivateSub CommandButton1_Click()Cells.Font.ColorIndex =1EndSubSub Worksheet_SelectionChange(ByValTargetAsRange)DimrngAsRange,i AsIntegerDimT AsString'T是要批量替换颜色的目标文字DimC AsInteger'C是颜色，通过设定不同的值，代表对应的颜色ForEachrngIn SelectionT= "版本"'重点，重点，重点，在使用该程序时只需要修改双引号中的内容即可C= 3'3代表红色，1代表黑色，2代表白色，4代表鲜绿色，5代表蓝色，6代表黄色，7代表粉红色，8代表青绿色，9代表深红色，10代表绿色i=1DoWhileInStr(i, rng,T)>0rng.Characters(InStr(i, rng,T),Len(T)).Font.ColorIndex=3i=InStr(i,rng,T) +1LoopNextEndSub
3、开始运行代码：--选中代码，点击绿色小三角--在弹出的对话框中输入荏半吨蛸名称“批量修改Excel单元格内部分文字颜色”，给程序起个砘捃坑聒名字--关闭弹出的界面--选中代码，点击小三角运行，开始运行代码--然后打开表格界面，选中目标区域，就可实现字体颜色的替换
4、保存复用：如果想重复使用，则可以将Excel文件保存为宏文件：--点击“开始”，“另存为”，在格式中选择“Excel启用宏的工作簿”，点击保存，即可
5、文件复用：--找到保存的宏文件，打开后，右击sheet页名称，点击“查看代码（V）”，我们就可以看到之前编写的VBA程序了，修改参数，点击运行就可以重复使用了
