[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2005/03/17(Thu) 15:29
投稿者名:すきんく
Eメール:
URL :
タイトル:
Excelを閉じるときのダイアログの非表示
はじめまして。早速ですが、質問させてください。

Excelのファイルを終了するときに「保存しますか?」などのダイアログを出したくないのですが、
Dim xlsBook    As Excel.Workbook
で宣言したときは、
xlsBook.DisplayAlerts = False
でよいと思うのですが、
Dim xlsBook    As Object
で宣言した場合に同じようにするにはどうしたらよいでしょうか?

投稿時間:2005/03/17(Thu) 15:58
投稿者名:ダンボ
URL :
タイトル:
Re: Excelを閉じるときのダイアログの非表示
こんな無責任に答えてよいかと自問自答しながら、、、


> xlsBook.DisplayAlerts = False
> でよいと思うのですが、
> Dim xlsBook             As Object
> で宣言した場合に同じようにするにはどうしたらよいでしょうか?

まったく同じくxlsBook.DisplayAlerts = Falseでいいと思います(未確認)。

ただ、xlsBookという変数名でExcel Bookに割り付けることが確定しているならば、
素直にDim xlsBook As Excel.Workbookとするのがベストで、As Objectのメリットは
まったく感じられない。

投稿時間:2005/03/17(Thu) 16:04
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: Excelを閉じるときのダイアログの非表示
> Dim xlsBook    As Excel.Workbook
> で宣言したときは、
> xlsBook.DisplayAlerts = False
> でよいと思うのですが、
だめなはずですが?

ヘルプを見れば解るのですが DisplayAlerts プロパティ の対象は Application になって
います。
Excel.Workbook ではエラーになるはずですが?

従って CreateObject("Excel.Application") 等で代入した変数で指定してください。

Dim xlApp As Object
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = False

投稿時間:2005/03/17(Thu) 16:41
投稿者名:すきんく
Eメール:
URL :
タイトル:
Re: Excelを閉じるときのダイアログの非表示
ダンボさん、花ちゃんさん、御回答どうもありがとうございます。
花ちゃんさんに教えていただいた方法で、無事Excelを閉じることができました。
objectで宣言したのは、改造元のPGがそうだったため、余計なところをいじりたくなかったからなので
す。
Excel操作をやり始めたばかりゆえ、理解できていないところが多々ありまして。
失礼いたしました。