Command Buttons and exporting table to Excel

[deeda67]

QUICK QUESTION:

I'm trying to export a table to a specific filepath/filename (so the table will be exported as the same file name every week for updating). I followed my VB instructions (so I think) and it doesn't give me a debug problem now, but its not working. Could someone let me know what I did wrong?

Private Sub Command17_Click()

Dim exportfile As String
exporttable = "Project Table"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel7, "Project Table", exportfile = "J:\Staff\D\Database\Summerville Project Table", True

End Sub

 

[KernelK]

Just write it like this:

Private Sub Command17_Click()
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel7, "Project Table", "J:\Staff\D\Database\Summerville Project Table", True
End Sub

 

[deeda67]

Thank You!!!!!!!!!!!!!