http://office.microsoft.com/ja-jp/access-help/HP001037943.aspx?pid=CH010411431041
Accessでmdbファイルを自動的に開かせるときにセキュリティ警告が発生してしまうことを抑制するには以下のコードを利用する。
Set AcApp = CreateObject("Access.Application") If AcApp.Version >= 11 Then AcApp.AutomationSecurity = 1 ' msoAutomationSecurityLow End If