EXCELのVBAでWORDが開いてあるかチェック
EXCELのVBAで特定のWORDが開いてあるかチェックしたいのですが、
あるフォルダにWORD文章があるかチェック
set appWord=GetObject(,"Word.Application")
Msgbox appWord.Documents.count なければエラー処理で終了
そのWORD文章の名前を取得
docFile=.... (仮にABC.docxという名前だとしますと)
そのWORD文章が誰かが使っている(開いているか)チェックしたいのですが..
1.使われているなら、-$ABC.docxが作られているはずだから
dir(-$ABC.docx)として、あれば使われていると判断したいのですが、
実験するとdir(-$ABC.docx)は、使われて実際にそのファイルがあっても
falseになってしまいます。dir関数でなくてもいいので、このファイルの
有無を調べる方法はないでしょうか?
2.その他、読み取り属性とかをみて判断する方法はないでしょうか?
ただし、使われている場合は、10秒ごとにチェックをいれて、
使われていない場合に、初めて開くので、エラー処理で逃げるのは
ダメなのですが。