tagCANDY CGI VBレスキュー(花ちゃん) - VBレスキュー(花ちゃん)の投稿サンプル用掲示板 - Visual Basic 6.0 VB2005 VB2010
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ
VBレスキュー(花ちゃん)の投稿サンプル用掲示板
     サンプル投稿用掲示板  VB2005 〜 用トップページ  VB6.0 用 トップページ
保存確認のメッセージを表示させない(VB6.0 基本編) ( No.4 )  [親スレッドへ]
日時: 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



 [スレッド一覧へ] [親スレッドへ]