How to quit application properly

["Jim ." <Escojpoer@AOL.COM>]

Hi-
       I am trying to open a wb and run a mac in that workbook, save it with
a filename, open the next wb, run the mac, save it with a new name, then go
back and close the original, but the original will not close. It has already
been saved with the new filename, but it and the app still remain open. Actually
I have 3 wbs to open and run macs and rename, but I am just working with these
two right now. Need help. At the end of this code I open ITEHH.xls and run
mac called Transfer. It runs and saves the file with a new name and closes the
workbook, then the wb CAT3D62003(which has already been saved once by this mac)
just stays open. How do I close it at the end of this code?? Thankx
     Jim

**Upper code here***running in wb called CAT3D to be saved as CAT3D62003 by
the following code

ChDir "C:\Documents and Settings\JIM \My Documents\BackUp\ITEREBATES"
    ActiveWorkbook.SaveAs Filename:= _
        "C:\Documents and Settings\JIM \My Documents\BackUp\ITEREBATES\CAT3D"
& Month(Now()) - 1 & Year(Now()) &  ".xls", FileFormat:=xlNormal _
        , Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
        CreateBackup:=False
    ChDir "C:\Documents and Settings\JIM \My Documents\Backup\ITEREBATES"
    Workbooks.Open Filename:= _
        "C:\Documents and Settings\JIM \My
Documents\Backup\ITEREBATES\ITEHH.xls"
        Application.Run ("ITEHH.XLS!Transfer")
        ActiveWorkbook.Close Savechanges:=True'<<here is where it does not
work
        Application.Quit
Application.ScreenUpdating = True
End Sub

--------------------------------------------------------------------------
The EXCEL-G list is hosted on a Windows NT(TM) machine running L-Soft
international's LISTSERV(R) software.  For subscription/signoff info
and archives, see http://peach.ease.lsoft.com/archives/excel-g.html .
                             COPYRIGHT INFO:
http://peach.ease.lsoft.com/scripts/wa.exe?SHOWTPL=COPYRIGHT&L=EXCEL-G