すみません！
教えてください
VB6.0からエクセルを起動して、処理した後に
エクセルを止める予定ですが、止まりません
ロジックは下記の通りです

' 既に起動しているExcelへの参照
     Set xlsApp = GetObject(, "Excel.Application")
     If Err.Number <> 0 Then
' 起動していない時Excelを起動
        Set xlsApp = CreateObject("Excel.Application")
     End If
' ワークブックを開く
     Workbooks.Open "ABC.xls"
' アクティブなブック参照
     Set xlsBook = xlsApp.ActiveWorkbook
' Sheetを開く
     Set xlsSheet = xlsBook.Sheets("XYZ")

　＊＊＊処理して印刷＊＊＊
　
ABCブックのXYZシートで処理したあとで止めている
  xlsBook.Close False
  xlsApp.Quit                  
  Set xlsSheet = Nothing
  Set xlsBook = Nothing
  Set xlsApp = Nothing

この結果タスクマネージャをみると
EXCELが実行されて残っております
どのようにいたら止めれるでしょうか
よろしくお願いいたします

こちらを参考にするとよろしいかと。

Excel のタスクを正常に終了できない現象
http://hanatyan.sakura.ne.jp/vbhlp/ExcelErr.htm

大変、参考になりました。
苦労していたので
とても助かりました。
また、よろしくお願いいたします

> こちらを参考にするとよろしいかと。
>
> Excel のタスクを正常に終了できない現象
> http://hanatyan.sakura.ne.jp/vbhlp/ExcelErr.htm

# 投稿記事の［修正］機能を使って、適切なタイトルを付け直してください。

>      Workbooks.Open "ABC.xls"
これが原因ですね。

Excel の参照設定を外し、それぞれの変数を Object 型にしてみましょう。
その場合、上記の行が
　コンパイルエラー「変数が定義されていません」
になるはずです。(Option Explicitありの時)


参照設定無しでもコンパイルが通る状態にまで修正すれば、
Excel の解放漏れも起きないハズ…。

ありがとうございます。
苦労しておりましたので、助かりました。
また、よろしくお願いいたします。

> # 投稿記事の［修正］機能を使って、適切なタイトルを付け直してください。
>
> >      Workbooks.Open "ABC.xls"
> これが原因ですね。
>
> Excel の参照設定を外し、それぞれの変数を Object 型にしてみましょう。
> その場合、上記の行が
> 　コンパイルエラー「変数が定義されていません」
> になるはずです。(Option Explicitありの時)
>
>
> 参照設定無しでもコンパイルが通る状態にまで修正すれば、
> Excel の解放漏れも起きないハズ…。

すみません。
DIM でオブジェクト変数を作成して
既存のエクセルファイルを代入して実行しておりますが
コンパイルエラーが出てしまいます。
面倒をおかけいたしますが、
エラーにならないロジックを教えていただけるでしょうか
よろしく、お願いいたします。


> # 投稿記事の［修正］機能を使って、適切なタイトルを付け直してください。
>
> >      Workbooks.Open "ABC.xls"
> これが原因ですね。
>
> Excel の参照設定を外し、それぞれの変数を Object 型にしてみましょう。
> その場合、上記の行が
> 　コンパイルエラー「変数が定義されていません」
> になるはずです。(Option Explicitありの時)
>
>
> 参照設定無しでもコンパイルが通る状態にまで修正すれば、
> Excel の解放漏れも起きないハズ…。

> エラーにならないロジックを教えていただけるでしょうか

左のフレームの[Excel & Word関係]をご覧になって試して見て下さい。

問題の部分が解決しました。
ありがとうございました。
また、よろしくお願いいたします

> > エラーにならないロジックを教えていただけるでしょうか
>
> 左のフレームの[Excel & Word関係]をご覧になって試して見て下さい。