Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10862 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【19507】エクセルの終了（×）について YN61 04/11/5(金) 21:38 質問[未読]
【19508】Re:エクセルの終了（×）について Kein 04/11/5(金) 21:40 回答[未読]
【19510】Re:エクセルの終了（×）について YN61 04/11/5(金) 22:12 質問[未読]
【19512】Re:エクセルの終了（×）について [名前なし] 04/11/5(金) 22:31 発言[未読]
【19517】Re:エクセルの終了（×）について YN61 04/11/6(土) 8:47 お礼[未読]
【19520】Re:エクセルの終了（×）について [名前なし] 04/11/6(土) 11:21 回答[未読]
【19523】Re:エクセルの終了（×）について YN61 04/11/6(土) 13:55 お礼[未読]
【19509】Re:エクセルの終了（×）について [名前なし] 04/11/5(金) 22:06 回答[未読]
【19511】Re:エクセルの終了（×）について YN61 04/11/5(金) 22:16 お礼[未読]
【19507】エクセルの終了（×）について
質問  YN61  - 04/11/5(金) 21:38 -
引用なし
パスワード
   会計ソフト(毎日の売上など）のデータをFD3.5のエクセルのフォームに貼り付け
VBAにてデータの処理をして、最終印刷までしています。

印刷終了後、エクセルのデータをなくして、元の空表に戻して終了したいのですが、
つまりエクセルの右上の「×」マークをおした状態ですが、次のような
コードでは、必ず「変更を保存しますか」というメッセージが出ます。
その都度「いいえ」を押して終了しなければなりませんが、メッセージ
をなくして、終了する方法を教えていただけませんでしょうか。

また、Quit以外にもっと違うコードの方がよいのでしょうか。
（それからQuitの意味も教えていただけませんでしょうか）

よろしくお願いします。


Sub 終了()

　Application.Quit

End Sub
【19508】Re:エクセルの終了（×）について
回答  Kein  - 04/11/5(金) 21:40 -
引用なし
パスワード
   Sub 終了()
　 ThisWorkbook.Saved = True
　 Application.Quit
End Sub

とすれば良いでしょう。
【19509】Re:エクセルの終了（×）について
回答  [名前なし]  - 04/11/5(金) 22:06 -
引用なし
パスワード
   他に以下の方法でも出来ます。

Sub 終了()
　 Application.Quit
　 ThisWorkbook.Close False
End Sub

Sub 終了()
　 Application.DisplayAlerts = False
　 Application.Quit
End Sub

Quit メソッド
Excel を終了します。(ヘルプより)
【19510】Re:エクセルの終了（×）について
質問  YN61  - 04/11/5(金) 22:12 -
引用なし
パスワード
   ▼Kein さん：

早速の回答、ありがとうございます。
データは印刷終了後は不要です。
エクセルのデータが保存されずに、元の空表に戻したいのですが･･･
データの加工後は、ブックには保存されずに終了したいのですが。
教えてください。

>Sub 終了()
>　 ThisWorkbook.Saved = True
>　 Application.Quit
>End Sub
>
>とすれば良いでしょう。
【19511】Re:エクセルの終了（×）について
お礼  YN61  - 04/11/5(金) 22:16 -
引用なし
パスワード
   ▼[名前なし] さん：

早速回答をいただきまして、ありがとうございます。
良く理解できました。

早速利用させていただきます。

今後ともよろしくお願いします。
【19512】Re:エクセルの終了（×）について
発言  [名前なし]  - 04/11/5(金) 22:31 -
引用なし
パスワード
   Saved プロパティ

変更を加えたブックを保存しない、または保存するかどうかを確認するダイアログ ボックスを
非表示にして閉じる場合は、このプロパティに True を設定してください。(ヘルプよﾘ)

ということなので、Keinさんのコードでもブックの保存はされません。
【19517】Re:エクセルの終了（×）について
お礼  YN61  - 04/11/6(土) 8:47 -
引用なし
パスワード
   ▼[名前なし] さん：

おはようございます。

ご指摘ありがとうございます。
Keiｎ様には失礼しました。テストさせていただいたら、保存されたように
思えました。今確認しましたら、上書きせずに終了しました。
本当に失礼しました。

因みに、せっかくここまで教えていただいたのですから、更に
保存して終了も教えてください。

色々とご指導ありがとうございます。


>Saved プロパティ
>
>変更を加えたブックを保存しない、または保存するかどうかを確認するダイアログ ボックスを
>非表示にして閉じる場合は、このプロパティに True を設定してください。(ヘルプよﾘ)
>
>ということなので、Keinさんのコードでもブックの保存はされません。
【19520】Re:エクセルの終了（×）について
回答  [名前なし]  - 04/11/6(土) 11:21 -
引用なし
パスワード
   ▼YN61 さん：
>因みに、せっかくここまで教えていただいたのですから、更に
>保存して終了も教えてください。

普通に保存してから終了すればいいだけでは・・・？

Sub 保存終了()
　ThisWorkbook.Save
　Application.Quit
End　Sub
【19523】Re:エクセルの終了（×）について
お礼  YN61  - 04/11/6(土) 13:55 -
引用なし
パスワード
   ▼[名前なし] さん：

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

これからもよろしくご指導の程よろしく
お願い申し上げます。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10862 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free