اخي العزيز اعمل استعلام توحيد الجداول بعد التوحيد اعمل تقرير مبني على استعلام التوحيد وتحت زر التصدير اكتب الكود التالي
On Error Resume Next
DoCmd.OutputTo acOutputReport, "name", acFormatXLS, CurrentProject.Path & "\name.xls", 0
Application.FollowHyperlink CurrentProject.Path & "\name.xls"
سيقوم الكود التالي بأنشاء وفتح على اكسيل شيت