指定のエクセルファイルが開いているか確認 (ID:143466)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 お世話になります。 指定したエクセルファイルが開いているかの確認をしたいと思いますが、 下記のプログラムでエラーが発生します。 Sub Test() Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook ’指定の物が開かれているかをチェックする For Each xlBook In xlApp.Workbooks ''見つかったらループを抜ける If xlBook.Name = "YYYYYYYY.xls" Then Exit For End If Next xlBook 上記のFor ＊＊＊＊＊＊のとこで NellReferenceExceptioｎはハンドルされませんでしたとのエラーが でます。解決策を教えて頂きたいと思います。