既存のexcelファイルを開き
加工して別名でファイルを保存という処理を
作成しているのですが
保存した後でも発生したexcelのプロセスが消えないなくて
VBで作成したプログラムを閉じない限り
excelが起動できなくて(重くて開かない)困っています
ソースは下のような感じです
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
xlApp = CreateObject("EXCEL.Application")
xlBook = xlApp.Workbooks.Open("D:\WORK\test.xls")
xlSheet = xlBook.Worksheets(1)
xlApp.Visible = False
'加工処理
xlSheet.Cells(1, 1).Value = TEXTBOX1.Text
xlSheet.SaveAs("D:\WORK\test001.xls")
xlApp.Quit()
xlSheet = Nothing
xlBook = Nothing
xlApp = Nothing
このようなソースで動かしたところ正常に
ファイルオープン、ファイルの加工、別名での保存はできるのですが
処理が終了されてもexcelのプロセスが消えなく
この処理を動かしたプログラムそのものを終了させないと
excelが終了しません。
できればVBのプログラムが動いた状態ででも
excelを起動したいのですが
プロセルを消す方法はありますでしょうか
ご教授お願いいたします
開発環境は
OS:winXP 言語:VB .NET
です
終了時のシーケンスがおかしいのではないですか?
XlSheet.Close
XlsBook.Close
XlsApp.Quit
でも駄目でしょうか?
ツイート | ![]() |