Private Sub cmdSales_Click() DoCmd.TransferDatabase acExport, "Microsoft Access", "C:\Sales.mdb", acTable, "tblSales", "ISales" End Sub