スキルアップ・問題解決なら、モーグにおまかせ！

フォルダ内のExcelブックを1つ1つ開いてデータを集計するブックがあります。
ずっと問題なく動いていたのですが、2週間くらい前から集計の処理が終了したあと閉じたブックのVBAプロジェクトがVBEに残るようになってしまいました。そのためか処理の速度が以前より遅くなっているようです。
 
原因を調べるために新しいブックを作成し、集計対象のブックに対して「Workbooks.Open」「Workbooks.Close」だけを行うマクロを実行してみましたが、やはりVBAプロジェクトが残ってしまいます。
「Workbooks.Close」の後にWorkbookオブジェクトの解放を行ったり「DoEvents」を入れてみたりしてみましたが改善しませんでした。
 
集計対象ではない別のブックを開いても同じ現象が発生することがあります。マクロを使わず、手動でブックを開いて閉じるだけでもVBAプロジェクトが残ってしまうことがあり、原因がまったく分かりません。
 
何か解決方法がありましたら教えていただけないでしょうか。

Workbooks.Open」「Workbooks.Close」だけを行うマクロを実行してみましたが、やはりVBAプロジェクトが残ってしまいます。
 
この具体的なコードを掲示してみてください。

引用:
閉じたブックのVBAプロジェクトがVBEに残る

引用:
原因を調べるために新しいブックを作成し、集計対象のブックに対して「Workbooks.Open」「Workbooks.Close」だけを行うマクロを実行してみましたが、やはりVBAプロジェクトが残ってしまいます。

引用:
集計対象ではない別のブックを開いても同じ現象が発生することがあります。

全てのブックを閉じ、一度、Excelを終了して新たに開き直しても同じ現象が起きませんか？
 
全てのブックを閉じ、Excelを終了
この段階で、タスクマネージャーでプロセスを確認してみてください。
Excel が 残っていませんか？
 
これは、何かしらの原因で、Excelの別プロセスが起動し、終了できていない事を示しています。
 
タスクから、その Excel を終了したら 速くなったりしませんか？
 
この状況が、集計ブックのVBAを動作させた後 にしか 発生しないのであれば
その集計ブックの VBA に問題がある可能性が高いと言えます。
 
あとは、すぐに確認できる方法としては
ファイル名を指定して実行 にて、
 
Excel /Safe
 
の様に、Excel を セーフモードで起動、これで、アドインの読み込みは制御できますから
セーフモードで、集計ブックを 実行し、
　・必ず プロセスが残るのであれば
　　　　その 集計ブック の VBA
　　　　または、その PCの実行環境 の問題
　　　　　　 (Excelの破損や、Windows環境、セキュリティ環境、ネットワークの問題)
　　　　　　　　→ この場合は、別 PC で実行してみて 再現するかで 問題の切り分けができるでしょう。
 
　・VBAの実行が、途中で止まるのであれば、アドインが読み込まれていないので止まる。
　　　と いう事は、アドイン または、アドイン＆集計ブック の組み合わせで問題がある。
　　　(これは集計ブック側の呼び出し方に問題がある可能性、アドイン側の可能性 両方ありえます)
 
　・実行して問題が発生しないのであれば・・・・
　　ちょっと、すぐには 候補がみつからないですね。
 
 
何にしても、提示された情報のみで、何が原因なのかは判断しかねます。
実行環境を変更し、原因を探ってみてください。

WinArrow様
 
ご返信ありがとうございます。
 

Sub Test()

    Dim Wb As Workbook

    Set Wb = Workbooks.Open(FileName:="（ファイルパス）")

    Wb.Close SaveChanges:=False
    
    Set Wb = Nothing

End Sub

Suzu様
 
すべてのブックを閉じて、Excelを終了するとタスクマネージャーからExcelが消えます。Excel自体を終了することで、それまで残ってしまっていたVBAプロジェクトも一旦すべて消えます。
 
また、マクロを使わず手動でブックを開いても同じ現象が発生するので、集計の処理を行うブックには問題がないと思っていたのですが、やはり問題があるのでしょうか。
マクロを変更して色々試してみても、同じ条件下でもVBAプロジェクトが残るか残らないかが変わってしまい、どうにも原因の特定ができません。（ただし、通常通り集計の処理を実行すると必ずVBAプロジェクトが残ります）
 
Excelをセーフモードで立ち上げてマクロ実行を試しましたが、やはりVBAプロジェクトが残ってしまいます。
別のパソコン（Windows11）ではVBAプロジェクトが残らなかったため、OSの問題かもしれません。
 
ご回答いただきありがとうございました。

現象として
 
Windows10
    集計ブック の マクロを実行すると 必ず発生
    手動で 集計ブック 以外の ブックを 開いた際に 発生する事がある
 
    Excelをセーフモード にて実行、集計ブックのマクロを実行すると 必ず発生
 
Windows11
    (Excelをセーフモード にて実行、)集計ブック の マクロを実行しても、発生しない
 
 
少なくとも、
あるマシンでは発生し あるマシンでは発生しない。
 
他のマシンでは、問題なく動いていて
手動で 集計ブック 以外の ブックを 開いた際に 発生する事がある
 
という事であれば、直接原因は、VBAコード では無い可能性が高く
PC 固有の 問題である可能性の方が高いでしょう。
 
・開いているファイルがクラウドを含めた、ネットワーク上に保存してあるのであれば
　ローカルに移動させ試してみる。
・Officeの Update を含めた、Windows UpDate の実行
・Officeの 修復
の順で試す事でしょうか。
 
それでも、発生するのであれば、
同じ Windows10 の マシンを用意し、
設定・環境 について比較・調整しながら原因を探っていく事になるでしょう。

こんばんは。
この件、1週間くらい前から私も発生しています。（Windows11、Excel2021）
根拠はないですが、WindowsかOfficeのアップデートによるものではないかと疑っています。
気持ち悪いし、少し不便ですが、そのうちまたアップデートで直るだろうと思って、まだ対策はしていません。
ちょっと確認してみました。
どうやらVBAでマクロ有ブックをCLOSEするとブックは閉じられるが、VBEのプロジェクトエクスプローラーではそのVBAプロジェクトが残る、そこからコードのウィンドウも開くことができて実行も可能。
Workbooks.Countではカウントされないし、Workbooks("残っているブック名")でも参照できず、やはりブックは閉じられてはいる模様。
確かにフォルダの中の複数ブックを扱う処理とかでマクロ有ブックが多数あるとうまくいかなくなりそうですね。

こんばんは。
 
こちらが参考になりました。リンク先はAccessの場合ですが。
 
https://answers.microsoft.com/ja-jp/msoffice/forum/all/access%E3%81%AEvba%E3%81%8B%E3%82%89sharepoint/4d71e73b-e0d4-4d6b-b117-d964c307cb25
 
恐らく類似の問題と思われます。バージョン2408からの現象と思われ、ちょっと手間なので試していませんが、2407に戻すと元に戻ると思われます。リンク先ではセキュリティ関連のアップデートによるのではないかとあり、ちょっと調べてみたところ、マクロのセキュリティを許可すると閉じても残ってしまうようです。
 
「警告して、VBAマクロを無効にする」のときにマクロブックオープン時に出る「Microsoft Excelのセキュリティに関する通知」ダイアログやExcelの上部に出る「セキュリティの警告」通知バーでマクロを有効にしたときに起こるようなので、これを回避したらVBEに残りませんでした。確認したのは、以下の場合です。
・「VBAマクロを有効にする」にして警告なしで実行にした場合
・「信頼できる場所」を設定してそこにファイルを置いた場合
 
リンク先ではセキュリティ強化の一環でバグではない可能性も指摘されてましたが、もしそうだとして2409以降も修正されなかったら嫌ですね。

要はマクロの許可をしなければ大丈夫のようなので、以下を試してみました。
 

Sub Test()

  Dim WB As Variant

  WB = Application.GetOpenFilename
    
  If VarType(WB) = vbBoolean Then
     Exit Sub
  Else
     Workbooks.Open WB
  End If

End Sub

Officeのアップデートが来ていて、
更新したら直りましたね。