أخي العزيز،
بما أنك قمت بطرح هذا الموضوع ضمن قسم الآكسس فأنا أفترض أن لديك برنامج معمول على الآكسس و ترغب بطباعة تقرير و تخزينه على الجهاز بنفس الوقت بدون تدخل من المستخدم
الكود التالي يوضح عملية طباعة التقرير و تخزين نسخة منه على مجلد إسمه Folder_Name مخزن على الـ C Drive و هو كاتالي :
Dim a
Dim b
b = Date
a = "C:\Folder_Name\" & b & ".xls"
DoCmd.OpenReport "Report Name"
DoCmd.OutputTo acOutputReport, "Report Name", xls, a