excelVBAからExcelを終了させる

Application.Quitで即終了するわけではない

            '警告メッセージを表示しない
            Application.DisplayAlerts = False
            '保存
            Call ActiveWorkbook.Save
            '終了させる
            Application.Quit
            ThisWorkbook.Close