1、打开代码界面：--打开Excel，右击当前sheet页名字，在弹出界面中，点击“查看代码（V）”，打开VBA代码编辑界面
2、粘贴代码（注意不用编写）：--将如下代码直接Cop鲻戟缒男y到打开的代码编写空白页，代码小白不要慌，按照批注说明修改2个参数，代码就编写完成了，代码如下：Private Sub CommandButton1_Click()Cells.Font.ColorIndex = 1End SubSub Worksheet_SelectionChange(ByVal Target As Range)Dim rng As Range, i As IntegerDim T As String 'T是要批量替换颜色的目标文字Dim C As Integer 'C是颜色，通过设定不同的值，代表对应的颜色For Each rng In SelectionT = "版本" '重点，重点，重点，在使用该程序时只需要修改双引号中的内容即可C = 3 '3代表红色，1代表黑色，2代表白色，4代表鲜绿色，5代表蓝色，6代表黄色，7代表粉红色，8代表青绿色，9代表深红色，10代表绿色i = 1Do While InStr(i, rng, T) > 0rng.Characters(InStr(i, rng, T), Len(T)).Font.ColorIndex = 3i = InStr(i, rng, T) + 1LoopNextEnd Sub
5、文件复用：--找到保存的宏文件，打开后，右击sheet页名称，点击“查看代码（V）”，我们就可以看到之前编写的VBA程序了，修改参数，点击运行就可以重复使用了
