Help us understand the problem. What is going on with this article?

Excel終了後に空のExcelウィンドウを残す方法

要点

.Saveして.Closeして.Quitすると、

With ThisWorkbook
    .Save
    .Close
End With

Application.Quit

・空ウィンドウが残る。辛い。
BlankPane.PNG

補足

-1. .Closeだけなら当然残る

ThisWorkbook.Close

-2. これは残らない

ThisWorkbook.Close
Application.Quit

-3. これも残らない

ThisWorkbook.Save
Application.Quit

-4. これも残らない

ThisWorkbook.SaveAs "[filename]"
Application.Quit

-5. これは残る

With ThisWorkbook
    .SaveAs "[filename]"
    .Close
End With

Application.Quit

-6. いずれもMicrosoft Office Professional 2016 Excelバージョン2006での動作。上記の単純なコードのみのプロシージャを標準モジュールに書いてテストした。

-7. 冒頭のケース以外にも空のウィンドウが残ってしまう理由は多岐に亘りそうで、以下の参考サイトでは
.Close.QuitでトリガーされるWorkBook_BeforeCloseイベントによって発生するループが原因、よって.Closeの前後をApplication.EnableEvents= False= Trueではさんでこれを回避」
との指摘もある(disableしちゃっていいの?とは思うが、見過ごしそうなチェックポイントではある)。

参考サイト

vba - How to close blank excel workbook along with Macro workbook? - Stack Overflow
https://stackoverflow.com/questions/24167475/how-to-close-blank-excel-workbook-along-with-macro-workbook

RODA
Why not register and get more from Qiita?
  1. We will deliver articles that match you
    By following users and tags, you can catch up information on technical fields that you are interested in as a whole
  2. you can read useful information later efficiently
    By "stocking" the articles you like, you can search right away