タイトル : Excelの終了操作 投稿日 : 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 |