EXCELが終了しません。 (ID:119824)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 お世話になります。ぺんたと申します。 VB6およびEXCEL2002,OSはWINDOWS2000Proにて開発を行っています。 VBからEXCELを起動して、終了してもEXCELが残ったままという現象をよく耳にしますが、今回の現象は自分なりに調べてみてもわからなかったので質問させていただきました。 Private Sub Command1_Click() Dim ObjExcel As Object Set ObjExcel = CreateObject("Excel.Application") ObjExcel.Workbooks.Open "C:\test.xls" 'シートをコピーして名前を変更 ObjExcel.Sheets("Sheet1").Select ObjExcel.Sheets("Sheet1").Copy after:=Sheets("Sheet1") ObjExcel.Sheets("Sheet1" & " (2)").Name = "test" ObjExcel.ActiveWorkbook.Save ObjExcel.ActiveWorkbook.Close Set ObjExcel = Nothing End Sub 以上の処理で、なぜかCOPYの処理を行うと、EXCELが終了しない現象が起こってしまいます。 ほかの処理でもEXCELを起動して書き込むような処理はやっているんですが、 COPY関数を使っていないのでちゃんと終了します。 どなたか、EXCELを終了させる方法おわかりの方いましたら教えてください。