where should i place it ?
'------------------------------------------------------------
' Macro11
'
'------------------------------------------------------------
Function Macro11()
strFile = "C:\Users\okl\Desktop\book.xls"
If Dir(strFile) <> "" Then Kill strFile
On Error GoTo Macro11_Err
DoCmd.SetWarnings False
DoCmd.OutputTo acTable, "sdf", "MicrosoftExcelBiff8(*.xls)", "C:\Users\okl\Desktop\book.xls", False, "", 0
Macro11_Exit:
Exit Function
Macro11_Err:
MsgBox Error$
Resume Macro11_Exit
End Function
Bookmarks