![](https://take-web.main.jp/top/task_help/wp-content/uploads/2022/05/img_calc_macro.png)
![](https://take-web.main.jp/top/task_help/wp-content/themes/cocoon-master/images/man.png)
Excelのマクロは、すぐに見つかりますがCalcはなかなか見つかりません。ようやく見つけたものです。
こちらのサイトを参考にしました、ありがとうございます。
上記サイトのコード一部変更しました
'選択範囲のサイズ、位置
With ThisComponent.CurrentController.selection
pX=.Position.X
pY=.Position.Y
sH=4000 '.Size.Height <=====
sW=6000 '.Size.Width <=====
End With
上の2箇所変えました。
プロパティ、メソッドを調べる方法
Sub Main
Dim Obj As Object
Obj = createUnoService("com.sun.star.ui.dialogs.FilePicker")
MsgBox Obj.DBG_Properties
MsgBox Obj.DBG_methods
End Sub
メッセージが表示されます。
![](https://take-web.main.jp/top/task_help/wp-content/uploads/2022/05/propty_05.png)
サービスの詳細を調べるアドオン「ERI」
![](https://take-web.main.jp/top/task_help/wp-content/uploads/2022/05/ERI_lookfor03.png)
コメント