- - PR -
VB.net→Excel複数起動
1
投稿者 | 投稿内容 |
---|---|
|
投稿日時: 2005-04-14 16:13
お世話になります、sinと申します。
現在、 Windows 2000 Server SP4 OfficeXP SP2 Microsoft.NET Framework 1.1 SP1 の環境で、VB.netからExcelマクロ(Workbook_Open())を呼び出しExcel帳票を 作成する処理を作成しています。 --- VBのコード ------------------------------------------------- Dim macroFullPath As String = "Excelマクロのパス" Dim objExcel As Excel.Application = Nothing Dim objBooks As Excel.Workbooks = Nothing Dim objBook As Excel.Workbook = Nothing objExcel = CreateObject("Excel.Application") objBooks = objExcel.Workbooks objBook = objBooks.Open(macroFullPath) objExcel.DisplayAlerts = False System.Runtime.InteropServices.Marshal.ReleaseComObject(objBook) objBook = Nothing System.Runtime.InteropServices.Marshal.ReleaseComObject(objBooks) objBooks = Nothing objExcel.Quit() System.Runtime.InteropServices.Marshal.ReleaseComObject(objExcel) objExcel = Nothing GC.Collect() System.Windows.Forms.Application.DoEvents() ---------------------------------------------------------------- この処理を1つのみ実行する場合は問題なく動作するのですが、 複数実行するとイベントビューア上に --- イベントビューア内容 -------------------------------- ソース(S): DCOM イベントID(I): 10010 サーバー {00024500-0000-0000-C000-000000000046} は、 必要なタイムアウト期間内に DCOM に登録しませんでした。 ---------------------------------------------------------- と表示されエラーとなります。 エラー情報を元にネット上で検索をかけたのですが 有力な情報を得ることができませんでした。 このエラーを回避する方法があれば、お願いします。 |
1