EXCELの保存して終了ボタンについて

EXCELにてよく使う機能をアドインとして、クイックアクセスツールバーに登録しているのですが、
保存して終了ができないので、何か手法がありましたらご教示お願いします。

そもそも、BOOK自体に保存して終了コマンドボタンを設置すると問題なく動作するのですが、アドイン登録するとそのアドイン自体をアクテブブックと判断するようで、xlamを閉じて終わります。

因みにVBAは下記です

Sub 保存して終了()

ThisWorkbook.Close SaveChanges:=True

Application.Quit
End Sub


クイックアクセスツールバーに登録するので、作業BOOKは特定しないでBOOKを保存して終了ボタンを設置したいのですが、いい方法は無いでしょうか

よろしくおねがいします。

No.1 ベストアンサー 回答者： fujillin 回答日時： 2021/06/25 12:03

こんにちは

ThisWorkbook は、ThisWorkbook（=マクロのあるブック）です。

＞アドイン登録するとそのアドイン自体をアクテブブックと
＞判断するようで、xlamを閉じて終わります。
ですので、単なる質問者様の勘違いです。
アクティブなブックを意味したければ、ActiveWorkbook でしょう。


ってか、「保存して閉じる」なら大仰な仕組みにしなくとも、 Ctr + S, W で済む話と思いますけれど…

この回答へのお礼

完璧です！！
一発解決いたしました。
よく使う機能をアドオンにて使用すると便利なので・・・

ありがとうございました。

お礼日時：2021/06/25 17:31