Dim objSheet As Object
Dim objCell As Object
objSheet = ThisComponent.CurrentController.Activesheet
objCell = objSheet.getCellRangeByName("B5")
objCell.Formula = "TODAY()"
End Sub
セルに関数 (数式) を設定するには Formula プロパティを用いて下記
のように設定する :
セルオブジェクト.Formula = "関数"
上記サンプルコードは、TODAY 関数を設定した例である。
0 件のコメント:
コメントを投稿