|
▼VBA初心者 さん:
こんな感じのイベント禁止ではどうでしょう。
ただし確認してみたところマクロ有効/無効の確認も
飛ばされるので推奨されるものではないのかもしれません。
Sub Macro1()
'
Application.EnableEvents = False
Workbooks.Open Filename:= _
"C:\TEST01.xls"
Application.EnableEvents = True
End Sub
>はじめまして。
>VBA初心者です。
>
>毎月の作業を入力する簡単なシステムを作成しています。
>既に納期が過ぎたものをファイルオープン時にアラートとして表示しています。
>
>既に納期が過ぎているかどうかを先月のファイルと現在日の差異で
>判断しているのですが、先月分のファイルをシステム内で開いたときにも
>先月のファイルのオープン時の処理が走ろうとしてエラーになってしまいます。
>
>なんとか回避したいのですが、マウスでファイルをクリックして
>開こうとしているのか、VBAによってファイルが開かられようと
>しているのかを判断することは可能でしょうか?
>
>よろしくお願いいたします。
|
|