tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル 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

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。