(OpenOffice Basic)Calcで枠線を引く方法

OpenOffice Basic で Calc のセルの枠線(罫線)を引く方法です。

先にBorderLineオブジェクトを作ってから、セルにセットするという流れになるようです。

Dim oSheet as object

oSheet =  ThisComponent.Sheets.getByName("Sheet1")

Dim oCell as object 

oCell =  oSheet.getCellRangeByName("C1")

'BorderLineオブジェクト生成

Dim l As New com.sun.star.table.BorderLine

'枠線の幅

l.OuterLineWidth = 35

'セルに枠線をセット

oCell.LeftBorder =  l

セルのLeftBorder, RightBorder, TopBorder, BottomBorder, プロパティーに BorderLine オブジェクトをセットするとそれぞれの辺に枠線がひけます。
セルだけでなく、CellRange (セル範囲)に対しても指定できるようですね。

ちなみに、OuterLineWidthの値が 35 の時がCalcのGUIで設定した時の 1.00 pt になるようです。

参考:
OOoBasic/Calc/border