vba吧 关注：17,059贴子：66,747
- 3回复贴，共1页
不感兴趣
开通SVIP免广告
使用vba提供的内置api
单元格.Characters(Start:=文本起始下标, Length:=文本长度).Font.color = 颜色值
如：
ActiveCell.Characters(Start:=3, Length:=4).Font.color = -16776961
作用是：
ActiveCell：定位到当前激活了的单元格
↓
.Characters(Start:=3, Length:=4)：调用Characters方法，该方法指定了该单元格的某段文本（起始下标是3，文本长度是4）
↓
.Font.color = -16776961：修改该文本的颜色，颜色代码是-16776961（红色）
注：
①ActiveCell：单元格，可以换成sheet.cells的形式,，如：sheet1.cells(1,1)
②不仅可以设置color，还可以设置font其它属性，如Size（大小）、FontStyle（文本样式）等等，具体参考有关于font的文档（微软官方文档可查）
单元格.Characters(Start:=文本起始下标, Length:=文本长度).Font.color = 颜色值
如：
ActiveCell.Characters(Start:=3, Length:=4).Font.color = -16776961
作用是：
ActiveCell：定位到当前激活了的单元格
↓
.Characters(Start:=3, Length:=4)：调用Characters方法，该方法指定了该单元格的某段文本（起始下标是3，文本长度是4）
↓
.Font.color = -16776961：修改该文本的颜色，颜色代码是-16776961（红色）
注：
①ActiveCell：单元格，可以换成sheet.cells的形式,，如：sheet1.cells(1,1)
②不仅可以设置color，还可以设置font其它属性，如Size（大小）、FontStyle（文本样式）等等，具体参考有关于font的文档（微软官方文档可查）
