Аксесс 97

В форме заполняется поля,потом все это сливается в екселевский файл.Проблема в том, что ексель остается загружен в оперативную память.Приходится его насильно выгружать диспетчером задач.
Делаю так:

Private Sub Печать_Click()
Set xlApp = CreateObject("excel.application")
Set xlApp = CreateObject("Excel.Application")
Set xlWkb = xlApp.Workbooks.Open("C:\шаблон\шаблон.xls")
Set xlsheet = xlWkb.Sheets("приложение1")

//-------тут заполняю екселевский файл-это без проблем
xlsheet.SaveAs FileName:="C:\файл.xls"
Set xlsheet = Nothing
Set xlWkb = Nothing
Set xlApp = Nothing

End Sub

Как сделать чтобы ексель не оставался впамяти?
Спасибо заранее