设置区域字体颜色
命令说明
设置指定区域字体的颜色,属性为RGB数组形式,如[R,G,B]
命令原型
Excel.SetRangeFontColor(objExcelWorkBook,sheet,strRange,listColor,bSave)
命令参数
参数 | 必选 | 类型 | 默认值 | 说明 |
---|---|---|---|---|
objExcelWorkBook | True | expression | objExcelWorkBook | 使用 "打开Excel工作簿"命令(Excel.OpenExcel) 或 "绑定Excel工作簿" 命令(Excel.BindBook)返回的工作簿对象 |
sheet | True | string | "Sheet1" | 如果使用字符串,则表示指定工作表的名字;使用数字,则表示指定工作表的顺序(从0开始) |
strRange | True | string | "A1:B2" | 指定的区域,支持单元格名如"A1:B2"与二维行列数组如[[单元格1行号,单元格1列号],[单元格2行号,单元格2列号]]两种形式,当使用单元格名时不区分大小写 |
listColor | True | expression | [255,255,255] | 数组形式RGB的颜色 |
bSave | True | boolean | False | 操作完成立即保存 |
运行实例
/*********************************设置区域字体颜色***************************************
命令原型:
Excel.SetRangeFontColor(objExcelWorkBook,"Sheet1","A1:B2",[255,255,255],false)
入参:
objExcelWorkBook--Excel工作簿对象(使用 "打开Excel"命令(Excel.OpenExcel) 打开的工作簿或使用"绑定Excel"命令(Excel.BindBook)绑定的工作簿对象)。
sheet--如果使用字符串,则表示指定工作表的名字;使用数字,则表示指定工作表的顺序(从0开始)。
strRange--指定的区域,支持单元格名如"A1:B2"与二维行列数组如[[单元格1行号,单元格1列号],[单元格2行号,单元格2列号]]两种形式,当使用单元格名时不区分大小写。
listColor--数组形式RGB的颜色。
bSave--操作完成立即保存。(布尔值true/false)
注意事项:
该命令不能单独使用,需配合 "打开Excel"命令(Excel.OpenExcel) 或"绑定Excel"命令(Excel.BindBook)一起使用才能正常使用,单独使用则会报错。
**********************************************************************************/
Dim objExcelWorkBook = ""
objExcelWorkBook = Excel.OpenExcel(@res"测试.xlsx",True,"Excel","","")
Excel.SetRangeFontColor(objExcelWorkBook,"Sheet1","A3:B5",[255,0,0],False)
TracePrint "设置区域字体颜色:Excel对象Sheet1'A3:B5'所在区域字体设置为红色"
Excel.CloseExcel(objExcelWorkBook,True)