Button on form to delete all records

[bbylls]

I am looking for code I can put on a button in a form to export all data in a single table to an Excel file, and then delete all of the records in the table.
I would also like to then have a button to import records into the table from an Excel spreadsheet.
Sounds crazy, but every year I have to start with fresh data in the table.
If I can export and import, at least the data will never be 'LOST'.


Thank you.

[SoftwareMatters]

To export all data to Excel use this:
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "TableName", "Path"

To delete all the records in the table write a delete query and have it trigger from the button like this:
DoCmd.OpenQuery "DeleteQueryName", acNormal, acEdit

To import all the records from Excel you need to link the Excel file as a table then werite an append query and trigger that from the button like this:
DoCmd.OpenQuery "AppendQueryName", acNormal, acEdit

Note: If you are going to trigger queries using this method it is a good idea to turn the warnings off at the start and then back on at the end to stop annoying messages:

DoCmd.SetWarnings False

code here...

DoCmd.SetWarnings True

[bbylls]

I did this:
Private Sub ExportData_Click()
On Error GoTo Err_ExportData_Click

DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Table1", "C:\Test.xls"

Exit_ExportData_Click:
Exit Sub

Err_ExportData_Click:
MsgBox Err.Description
Resume Exit_ExportData_Click

End Sub

And got this error message:
The Microsoft Jet database engine cannot open the file 'C:\Test.xls'. It is already opened exclusively by another user, or you need permission to view its data.