タイトル : Excelオープン、クローズ 投稿日 : 2009/04/24(Fri) 09:13 投稿者 : ると
こんにちは。 下記の用に設定してVB.NETからExcelをオープン、クローズさせています。 1回目にオープンさせる時はエラーなく上手くいくのですが 2回目にオープンさせるときに xlBook = xlBooks.Open(xlFilePathO) ↑この箇所で 「オブジェクト参照がオブジェクト インスタンスに設定されていません。」 とエラーになります。 Publicで宣言してあるので再度宣言しなくても大丈夫だと思うのですが・・・。 タスクで見てみてもExcel自体は立ち上がってるようです。 何が問題なのでしょうか? Public xlApp As New Excel.Application Public xlBooks As Excel.Workbooks = xlApp.Workbooks Public xlBook As Excel.Workbook = Nothing Public xlSheets As Excel.Sheets = Nothing Public xlSheet As Excel.Worksheet = Nothing Public Function ExcelOpen() xlFilePathO = "TEST1.xls" xlBook = xlBooks.Open(xlFilePathO) xlSheets = xlBook.Worksheets '// Excelの表示 xlApp.Visible = True End Function Public Sub ExcelClose() '================== 終了処理 ===================== MRComObject(xlSheet) 'xlSheet の解放 MRComObject(xlSheets) 'xlSheets の解放 xlBook.Close(False) 'xlBook を閉じる MRComObject(xlBook) 'xlBook の解放 MRComObject(xlBooks) 'xlBooks の解放 xlApp.Quit() 'Excelを閉じる MRComObject(xlApp) 'xlApp を解放 End Sub |