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 = Ci = InStr(i, rng, T) + 1LoopNextEnd Sub
3、设置成功后，开始运行代码：--选中代码，点击绿色小三角，开始运行--在弹出的对话框中输入名称“批量修改Excel单元格内部分文字颜色”，给程序起个名字--点击“创建”
4、关闭弹出的界面
5、--选中代码--点击菜单栏，绿色小三角--点击弹出的“宏”对话框，点击“运行（R）”，开始运行宏程序。
6、--点击某个目标区域的单元格--全选目标区域--可以看到，所有我们要显示为红色的文字，全部显示为红色了。
7、至此，设置完成。
8、此外，如果下次想继续使用，可将文件另存为宏文件。--点击“开始”-->“另存为”--选择要存放的位置
9、--在打开的界面中，“保存类型（I）：”选择“Excel启用宏的工作簿”--点击“保存（S）”，保存成功
10、在文件的存放位置，我们可以看到一个宏图标的文件
11、下次使用时，打开文件，根据需要，按照前述步骤修改VBA程序的参数后，运行即可。