Exporting Data from table to CSV file

[kmurtha]

Hey All,

This is probably a simpel task but the process escapes me.

Using a macro, I want to take all the rows I have in a table and export them to a CSV file and then delete the rows in the table. What is the best way to do this?

Thanks much

 

[Joe4]

Here is some simple code that will do that. Simple replace the Table Names and export file names to suit your needs:

Sub ExportMacro()

'   Export file to CSV file
    DoCmd.TransferText acExportDelim, "", "Table1", "C:\C\Test.csv", False, ""

'   Delete data from table
    CurrentDb.Execute "DELETE * FROM Table1"

End Sub