How to open Excel file from Microsoft Access 2007
strFileName = CopyMyFile("abc.xlsm")
Set appExcel = CreateObject("Excel.Application")
appExcel.Workbooks.Open strFileName
' Put the data in the file
appExcel.Visible = True
Set appExcel = Nothing