here is the code that I am trying but I'm getting compiling errors! Can someone help?
Code:
Dim xlApp As Excel.Application
Dim xlWrkBk As Excel.Workbook
Dim xlSht As Excel.Worksheet
Dim myRec As DAO.Recordset
Dim StartDate As DAO.Field
Set xlWrkBk = GetObject("W:\edsplus\applications\0cmad\cmad_chart_spreadsheet.xls")
Set xlSht = xlWrkBk.ErrorOverTime
Set myRec = CurrentDb.OpenRecordset("Select Chart Form")
Set StartDate = myRec.Fields("Start_Date")
myRec.MoveFirst
xlSht.Cells(1, "K") = StartDate
xlWrkBk.Save
.....