★VBA実行時に警告表示を無効にしたい

質問

●環境
OS：Winxp
アプリ：Outlook2000

・こんにちは。Outlookでメールを受信した時に自動でメールを名前を付けて保存するVBAのマクロを作った　のですが、マクロ動作時に「プログラムがアドレス帳を含む可能　性のあるOutlookデータにアクセスしようとしていま　す。よろしいですか？」
というダイアログがでます。

マクロのセキュリティは”低”に設定しています。
プログラムでダイアログを無効にしようと思って
Application.DisplayAlerts = False
と指定したのですが、OutlookVBAではサポートしてな　いプロパティでした。

ダイアログを出さないようにするにはどうしたらよいのでしょうか？

回答No.1

VT250F · ベストアンサー

プロパティが用意されてなければしょうがないですね。

しょうもない技ですが、
ダイアログが出るまで数秒スリープ
　　（SleepというAPI関数を利用）
ダイアログのタイトルを取得する
　　（やはりAPI関数）
タイトルが取得できるまでタイマーで待って、
そのダイアログに SendKeys するぐらいですかね。

API 関数とはＯＳに呼びかける外部関数です。
SendKeys はうまくできない場合があるので、
あまりきれいな手法ではないですね。

あと、レジストリか何かで、確認ダイアログを出さない方法があるかもしれません。

お礼

返答が遅くなってすみません。
なかなかうまくいかないので、返答ができませんでした。もう少し自分でもがんばってみます。