Libre:057 行全体を選択する

DispatchHelperを使用する方法も有りますが、

個人的には、getCellRangeByNameを使った方が好きです。

 

sub ksSelectColumns

dim activeSheet as object
dim selectedRange as object

activeSheet = ThisComponent.CurrentController.ActiveSheet

selectedRange =activeSheet.getCellRangeByName(“B1:B1048576”)
selectedRange.CellBackColor = 3


end sub