Sub transfer() DoCmd.TransferDatabase acImport, "Microsoft Access", _ "C:\mydb.mdb", acTable, "tblI", "tblI" End Sub