Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

1512 / 13644 ﾂﾘｰ

←次へ　｜　前へ→

▼

【73914】エクセル終了時に保存させない方法 流星 13/3/19(火) 17:23


	【73914】エクセル終了時に保存させない方法

流星

- 13/3/19(火) 17:23 -


	引用なし

	パスワード

ｴｸｾﾙ2003、Winxp

アクセスのテーブルを既存エクセルの特定シートにエクスポートし
作業が終わった時、ツールの終了を選んぶと何もメーツセージを
表示せず（保存もせず）終了させようと、下記の内容で実施するの
ですが、アクセスからのデータのみがシートに残ってしまいます。
何か、よい方法はありませんでしょうか？

Private Sub Workbook_BeforeClose(Cancel As Boolean)

　　'全ての Book を保存しないで閉じる　2006/10/08 pPoy
'最後に Excel も終了する
　　Dim w As Workbook
　　'全ての Book を保存したことにする (保存はしない)
　　For Each w In Workbooks
　　　　w.Saved = True
　　Next
　　
　　'Excel を終了する
　　Application.Quit
　　'Book を閉じる
　　ThisWorkbook.Close False

End Sub


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

1512 / 13644 ﾂﾘｰ

←次へ　｜　前へ→

ページ：

┃

記事番号：

(SS)C-BOARD v3.8 is Free