「Libreoffice/表計算」の版間の差分
提供: 初心者エンジニアの簡易メモ
(→セル実行のマクロを作成する) |
|||
| 行27: | 行27: | ||
以下をセルに入力すると、123とでる。 | 以下をセルに入力すると、123とでる。 | ||
| − | =TEST() | + | =TEST() |
| + | |||
| + | ==引数追加のセル実行のマクロを作成== | ||
| + | <pre> | ||
| + | Public Function MYADD(a As Double, b As Double) As Double | ||
| + | MYADD = a + b | ||
| + | End Function | ||
| + | </pre> | ||
| + | 以下をセルに入力 | ||
| + | =MYADD(1;1) | ||
2026年2月16日 (月) 10:22時点における版
マクロ実行環境を整える
- OpenOffice表計算の設定を開く。
- OpenOffice/セキュリティからマクロセキュリティを選択し、セキュリティレベルを選択する。
レベル中にしておけば、署名なしマクロでも、確認ダイアログから実行できる。
メッセージのマクロを作成する
表計算/ツール/マクロの管理/OpenOfficeBasic
Sub Main MsgBox "hoge" End Sub
参考：https://brain.cc.kogakuin.ac.jp/~kanamaru/lecture/vba2013/LOB01-intro02.html
実行
表計算/ツール/マクロを管理/OpenOfficeBasicから、Mainマクロなど関数を選択して、実行すると、MsgBoxが表示される
セル実行のマクロを作成する
以下マクロを記述
Public Function TEST()
TEST = 123
End Function
以下をセルに入力すると、123とでる。
=TEST()
引数追加のセル実行のマクロを作成
Public Function MYADD(a As Double, b As Double) As Double
MYADD = a + b
End Function
以下をセルに入力
=MYADD(1;1)
