Public Sub ExportTable() DoCmd.OutputTo acOutputTable, "tblCustomer", acFormatRTF, _ "C:\BegVBA\Customer.rtf" End Sub