- 日時: 2007/08/16 23:27
- 名前: 花ちゃん
- ***********************************************************************************
* カテゴリー:[エクセル][][] * * キーワード:保存時,終了時,ダイアログ, * ***********************************************************************************
元質問:EXCELの上書きしますかを出さない方法 - けんじ 2002/08/27-20:00 No.244
VBから既存のEXCELシートを起動しデータをセットしてから保存するプロプラムを作成しました。 しかし、保存する時に「この場所に〜既にあります置き換えますか?」のメッセージBOXが表示 されてしまします。メッセージを出さず、上書き保存する方法は無いでしょうか
----------------------------------------------------------------------------------- 保存確認のメッセージを表示させない - 花ちゃん 2007/08/08 ----------------------------------------------------------------------------------- 当サイト内や過去のログにも掲載されてはいるのですが、質問が多いのでここにも掲載して おきます。
保存処理をするまでに下記の1行を、どこかに記入して下さい。 xlApp.DisplayAlerts = False
と書いておいたら起動する前に書かれた方もあったので具体例を下記に書いておきます。
'================================================================== '終了処理 '保存時の問合せを非表示に設定 xlApp.DisplayAlerts = False '下記の保存処理の直前に書いて下さい。 'Worksheet を名前をつけて保存します 'xlSheet.SaveAs xlFilePath 'オブジェクトを解放します Set xlSheet = Nothing xlBook.Close 'Book を閉じる Set xlBook = Nothing xlApp.Quit 'Quit メソッドを使って Excel を終了します。 Set xlApp = Nothing End Sub
|