| タイトル | ： Excelの終了操作 |
| 記事No | ： 724 |
| 投稿日 | ： 2004/02/18(Wed) 01:13 |
| 投稿者 | ： hajime |
[OSのVer]：Windows XP [VBのVer]：VB.NET2003
Excel2000
VBによりExcelを起動させて必要処理を行った後にExcelを可視化しています。
起動させたプログラムを終了せずに
ExcelをExcel側から終了させるとプロセスが残ってしまいます。
過去レスを見てみましたが探し出せませんでした。
可視化のあとにどのように記述すればいいですか？
長文になって申し訳ありませんが、下記に一部のプログラムをコピーします
Dim apExcel As Excel.Application
Dim ExcelBook As Excel.Workbook
Dim ExcelSheet(2) As Excel.Worksheet
Dim Excelchart As Excel.ChartObjects
apExcel = CType(CreateObject("Excel.Application"), Excel.Application)
ExcelBook = CType(apExcel.Workbooks.Open(Dir & "I.xls"), Excel.Workbook)
ExcelSheet(1) = ExcelBook.Worksheets(1)
ExcelSheet(2) = ExcelBook.Worksheets(2)
〜必要処理〜セルに代入など
ExcelSheet(1).Activate()
apExcel.Visible = True
|