Sub import() DoCmd.TransferText acImportFixed, "CompanyFixed", "tblCompanyFixed", _ "C:\Fixed.txt", True MsgBox "Company details imported" End Sub