投稿日 | : 2003/06/26(Thu) 15:00 |
投稿者 | : こうじ |
Eメール | : |
URL | : |
タイトル | : Re: EXCEL処理について |
とりあえず、質問2は対処できました。
質問1が対処できれば、質問2は対処しなくても大丈夫だと思うのですが、
まだ対処方法がわかりません。
質問2の対処方法は、VBで操作してるブックを閉じた後に
VBで操作してるExcel.Applicationのブック数を取得し
ブックが無かったら、Excelを閉じる。ブックが在ったら
保存確認ダイアログ表示するようにして、Excelは閉じない。
> 2) 上記の質問に関連するかもしれませんが、
> 画面終了時にブックも終了しているのですが、全然関係ないブックも終了されてしまいます。
> '*** Form_UnLoadイベントにて ********************************
'保存確認ダイアログ非表示
xlApp.DisplayAlerts = False
'作業ブックを閉じる
Call xlBook.Close(False)
'ブック数格納
intCnt = xlApp.Workbooks.Count
If intCnt = 0 Then
'# ブックが無い場合
'Excelを終了
xlApp.Quit
Else
'保存確認ダイアログ表示
xlApp.DisplayAlerts = True
End If
> ' オブジェクトの開放
> Set xlSheet1 = Nothing
> Set xlSheet2 = Nothing
> Set xlBook = Nothing
> Set xlApp = Nothing
> '***********************************************************