別のフォームを開くマクロを検索してコピペしたんですが、実行すると
「BASICランタイムエラー.オブジェクト変数は設定できていません。」
とエラーになります 下記のマクロだけでは駄目なんでしょうか?
Sub Form1Open()
ThisDatabaseDocument.FormDocuments.getByName("フォーム1").open()
End Sub
参考ページ
http://rasuka.webcrow.jp/@factory/tips_ ... index.html
別のフォームを開けない
Re: 別のフォームを開けない
Sub Form1Open()
Dim oDoc As Object
oDoc = ThisDatabaseDocument.FormDocuments.getByName("フォーム1")
oDoc.open()
End Sub
これでどうかな?
Dim oDoc As Object
oDoc = ThisDatabaseDocument.FormDocuments.getByName("フォーム1")
oDoc.open()
End Sub
これでどうかな?
OpenOffice.org 4.1.5
Win 7 10
Win 7 10