ドキュメントウインドウオプション ｖｂａ

アクセス２０１０は、デフォルトで、
ドキュメントウインドウオプションが「タブ付きドキュメント」
になってると思うのですが、
ＶＢＡでこれをウインドウを重ねて表示するに設定する方法はありますか？

ネットからのコピペで

Sub 閉じる時最適化を有効にする()
Dim i As Long

i = Application.GetOption("Auto Compact")

If i = 0 Then
Call Application.SetOption("Auto Compact", True)
End If

End Sub

これは、見つかったのですが、
ドキュメントウインドウオプションを設定する方法が見つからないので教えてください。
ご教授よろしくお願いします。

No.1 ベストアンサー 回答者： nicotinism 回答日時： 2013/09/28 23:35

Googleった結果

currentdb.Properties("UseMDIMode")
1 = overlapping windows
0 = tabbed documents

currentdb.Properties("UseMDIMode") = 1
で変更すれば出来ました。
(一旦ファイルを閉じないと反映されません）

この回答へのお礼

currentdb.Properties("UseMDIMode") = 1
で望みどおりになりました！
有難うございます。

お礼日時：2013/10/13 09:37