Sub mail() DoCmd.SendObject acSendTable, "tblIceCream", acFormatXLS, _ "A", "B; C", _ "d@w.com", "Prices", _ "our latest price list." End Sub