LibreOffice Base で、フォームを自動的に開く方法

LibreOffice Base では「自動的に開くフォーム」を指定できないので・・・。

某マニュアルを参考に、マクロでの実装を試みてみました。

が、資料が古いせいか、うまくいかない（泣）

しかたなく、Webの記事を探しまわり、ようやく上手くいったのが、次のコードです。




自動的にフォームを表示するマクロ

' フォームの自動表示 ' Form1 には任意のフォームの名前を指定 Sub AutoFormOpen()   DoEvents()   ThisDataBaseDocument.CurrentController.Connect()   ThisDatabaseDocument.FormDocuments.getByName("Form1").open() End Sub

まぁ、判ってしまえば何てことはないですね。

なお、これを実装する方法については、Webサイトの方に説明しておきましたので、
よろしければどうぞ。


【参　考】

LibreOffice Base フォームを自動的に開く
http://rasuka.webcrow.jp/@factory/tips_LibreOffice/Base_AutoOpenForm/