Libre:078 条件によりセルの背景色を設定する

セルの背景色はcellBackColorで設定します。

RGB指定ですね。

条件はif文でOK!(省略します)

 

Sub ksCalcAutoFormat
Dim oDoc as Object
Dim objSheet as Object
Dim cellRange as Object

objSheet = ThisComponent.getSheets().getByIndex(0)
cellRange = objSheet.getCellRangeByPosition(0, 0, 5, 5)
cellRange.cellBackColor = RGB(255,0,0)

End Sub

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

CAPTCHA