تصدير تقرير للأكسيل لكن ظهر التاريخ بالميلادي

السلام عليكم ورحمة الله وبركاته

أستخدمت كود لتصدير تقرير إلى الأكسيل وإلى الورود .. وكان الكود من مثال الأستاذة المتميزة أم عهود زهرة ...

وهو هذا الكود :

   Dim stDocName As String
    stDocName = "R_xls"
    DoCmd.OpenReport stDocName, acViewPreview
   Dim strNumber As Variant
strNumber = "R_xls"
DoCmd.OutputTo acReport, "R_xls", "MicrosoftExcelBiff8(*.xls)", "d:\mot\R_2" & strNumber & ".xls", False, "", 0

DoCmd.OutputTo acReport, "R_xls", "RichTextFormat(*.rtf)", "d:\mot\Invoice_" & strNumber & ".doc", False, "", 0

بحيث أن R_xls هو اسم التقرير المراد تصديره ..

المشكلة هي :

تم تصدير التقرير للإكسيل لكن ظهر التاريخ فيه بالميلادي !!! وتاريخ التقرير الأصل أنه هجري ..

بينما تم تصدير نفس التقرير إلى ملف وورد والنتائج هجري تمام ..

فما هي الأشكالية .

لعلي أجد الأجابة عن أحد الأخوة أو الأخوات ..

شكرا لكم وغفر الله لي ولكم ولوالدينا .