[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『マクロで終了』(ユウ)
エクセル2003
OSXPです
過去の[[20060809154648]]コスケさんへの解答を詳しく説明して
ほしいです。
Sub try2() Dim wb As Workbook Application.DisplayAlerts = False For Each wb In Workbooks If wb.Name <> ThisWorkbook.Name Then wb.Close SaveChanges:=True '上書き保存あり Falseなら上書き保存なし End If Next Application.Quit ThisWorkbook.Close SaveChanges:=True '上書き保存あり False上書き保存なし End Sub
もう一つ質問なのですが、メニューバーなどから普通に終了するときも
【"Book1"への変更を保存しますか?】みないな画面を出したくありません。
終了時に自動起動するマクロは作成できないのでしょうか?
Thisworkbookモジュールに
Private Sub Workbook_BeforeClose(Cancel As Boolean)
End Sub
として、その中に記述するか
標準モジュールに
Private Sub Auto_Close()
End Sub
として、その中に記述してみてください。 (momo)
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.