跳到主要内容

设置单元格字体颜色

命令说明

设置指定单元字体的颜色,属性为RGB数组形式,如[R,G,B]

命令原型

Excel.SetCellFontColor(objExcelWorkBook,sheet,strCell,listColor,bSave)

命令参数

参数必选类型默认值说明
objExcelWorkBookTrueexpressionobjExcelWorkBook使用 "打开Excel工作簿"命令(Excel.OpenExcel) 或 "绑定Excel工作簿" 命令(Excel.BindBook)返回的工作簿对象
sheetTruestring"Sheet1"如果使用字符串,则表示指定工作表的名字;使用数字,则表示指定工作表的顺序(从0开始)
strCellTruestring"A1"指定的单元格,支持单元格名如"A1"与行列数组如[行号,列号]两种形式,当使用单元格名时不区分大小写
listColorTrueexpression[255,255,255]数组形式RGB的颜色
bSaveTruebooleanFalse操作完成立即保存

运行实例

/*********************************设置单元格字体颜色***************************************
命令原型:
Excel.SetCellFontColor(objExcelWorkBook,"Sheet1","A1",[255,255,255],false)
入参:
objExcelWorkBook--Excel工作簿对象(使用 "打开Excel"命令(Excel.OpenExcel) 打开的工作簿或使用"绑定Excel"命令(Excel.BindBook)绑定的工作簿对象)。
sheet--如果使用字符串,则表示指定工作表的名字;使用数字,则表示指定工作表的顺序(从0开始)。
strCell--指定的单元格,支持单元格名如"A1"与行列数组如[行号,列号]两种形式,当使用单元格名时不区分大小写。
listColor--数组形式RGB的颜色。
bSave--操作完成立即保存。(布尔值true/false)
注意事项:
该命令不能单独使用,需配合 "打开Excel"命令(Excel.OpenExcel) 或"绑定Excel"命令(Excel.BindBook)一起使用才能正常使用,单独使用则会报错。
**********************************************************************************/
Dim objExcelWorkBook = ""
objExcelWorkBook = Excel.OpenExcel(@res"测试.xlsx",True,"Excel","","")
Excel.SetCellFontColor(objExcelWorkBook,"Sheet1","A9",[255,0,0],False)
TracePrint "设置单元格字体颜色:Excel对象Sheet1'A9'所在单元格字体设置为红色"
Excel.CloseExcel(objExcelWorkBook,True)

可视化样例