お疲れ様です。

以下の処理を行っているのですが、どうやっても裏にExcelが起動されたままで
終了してくれません。
ConnectToNewObjectを１回にしてみたり、DESTROYが記述してなかったので、
追加してみたりと同様の質問があったので、それを参考にしてみたのですが、
どうもうまくいきません。

他に何かしなければいけないことがあるのでしょうか？

よろしくお願いします。

/***********************************************************/
oleobject xlsole

//エクセルオープン
xlsole = CREATE oleobject
li_rtn = xlsole.ConnectToNewObject(\"excel.application\")
xlsole.Application.Workbooks.Open(l_str_cp_name)

do until FileExists (l_str_cp_name) = TRUE
loop
　//セルへセット
next

xlsole.Application.ActiveWorkbook.Save()  //上書き保存
xlsole.Application.Workbooks.Close()
xlsole.Quit;

li_rtn = xlsole.DisconnectObject()
DESTROY xlsole // インスタンス破棄
/***********************************************************/

Excel2000を使用しています。