Sub TestExportXML() Application.ExportXML acExportTable, "tblEmployees", "c:\Employees.xml", "c:\ExmployeesSchema.xml" End Sub