• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Excel-VBAでアプリケーションエラー)

Excel-VBAでアプリケーションエラー

このQ&Aのポイント
  • Excel-VBAで作成されたマクロの保守を行っています。現在、アプリケーションエラーが発生しており、原因を調査中です。
  • 問題の起きているマクロでは、別のブックを開いたり、自ブックを閉じたりしています。
  • アプリケーションエラーが発生した時点で、特定のブックのみが開かれ、エラーダイアログで再起動するとブックが閉じられ、再度開かれます。これは異常終了しているブックの可能性があります。

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

(1)ブックAのマクロで、ブックBを開く (2)ブックAで、自ブックをクローズする。 の実際のコードと、B にWorkbook_openかAuto_open が あればそれも一緒に提示されれば、話は早いと思いますけど? 別解として新たなインスタンスでExcelを立ち上げてみるとかだと・・・? Sub てすと() Dim xl As Excel.Application Set xl = CreateObject("excel.application") xl.UserControl = True xl.Visible = True xl.Workbooks.Open ("d:\B.xlsm") 'Set xl = Nothing ThisWorkbook.Save Application.Quit End Sub

MOLITTY
質問者

お礼

ご回答ありがとうございます。別解の方法にしたら、事象は発生しなくなりました。 ちなみに元のソースはこんな感じでした。 Workbooks.Open Filename:="Bのブックのファイル名" Sheets("Bのブックのシート").Select Windows("自ブックのブック名").Activate ActiveWorkbook.Save ActiveWindow.Close  ←ここでアプリケーションエラー発生 本当にありがとうございました。

関連するQ&A