اذهب الي المحتوي
أوفيسنا

حفظ التقرير قبل الطباعة ( تمت االفائدة )


الردود الموصى بها

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

عندي تقرير واريد في كل مره يتم طباعته اخذ نسخة من نفس التقرير بالمستندات او اي مكان على الهارد ويا حبذا لو يعطيني خيار معاينة ام طباعة فقط ام طباعة مع الاحتفاظ بنسخة من التقرير في مكان ما

وجزاكم الله خير الجزاء

رابط هذا التعليق
شارك

عذرا اخي الفاضل

ولكني لا اعرف فعلا اين المخالفه بالعنوان

وجزاكم الله خيرا

اقراء القواعد

وبالاخص ما يخص العنوان

http://www.officena.net/Tips/Questions.htm

وستعرف اين المخالفة

رابط هذا التعليق
شارك

بارك الله فيك اخي الفاضل / عبد الله

لقد قرأتها الان ومشكور اخي واعتذر للمخالفة الغير مقصودة

عنوان المشاركة

1 . يجب أن يكون عنوان المشاركة يدل على محتواها

2 . ان لا يحتوي على عبارات مثيرة مثل " النجدة " ، "الحقونا

3. كما يمنع منعا باتا توجيه السؤال الي شخص بعينه لان هذا قد يدفع الاخرين الي عدم الاجابة ،و الهدف هو التفاعل من الجميع.

رابط هذا التعليق
شارك

انظر هذا الرابط

http://www.officena.net/ib/index.php?showtopic=34756

واقرأ بتركيز رد الأخ أبو ياسر اولا ( امكانية حفظ التقرير على اكثر من صيغة )

ثم اقرأ بتركيز ايضا ما تفضل به الاخ ابو يامن واعمل ما اشار به

ثم انظر الى الكود الذي أدرجه واجعله يلي أمر الطباعة في تقريرك أو يسبقها

جرب ، وطبق ، وحاول

رابط هذا التعليق
شارك

بعد اذن الاخ الفاضل ابو خليل

اخوي

يمكن ذلك ولكن بستخدام نموذج لفتح التقرير

طبعا قم بتغيير مسار الملف ونوعه حسب حاجتك حيث المسار الحالي كما هو موجود بالكود في زر الامر تقرير

طبعا وضعت نوع الملف pdf الى اذا يوجد لديك نوع اخر ارجو تحديده

رابط هذا التعليق
شارك

اخي الفاضل الكريم / Bluemind

الف شكر على سرعة الاستجابة لاستفساري اخي

ولكني اريد الملف بصيغة الورد ، ولقد حاولت تغيير الامتداد ولكن بدون فائدة وقبل تعديل الامتداد اعطاني تلك الرسالة

رابط هذا التعليق
شارك

اخي الفاضل / ابو خليل

لقد جربت الحدث الذي احضره اخونا الكريم ابو يامن وهو

Dim a

Dim b

b = Date

a = "C:\Folder_Name\" & b & ".xls"

DoCmd.OpenReport "Report Name"

DoCmd.OutputTo acOutputReport, "Report Name", xls, a

ولكني عدلت عليه تعديل بسيط وهو ان تتم المعاينة ثم اختيار نوع حفظ الملف وليس الطباعة مباشرة بالكود الاتي

Dim a

Dim b

b = Date

a = "D:\Documents and Settings\user\My Documents\" & b & ".xls"

DoCmd.OpenReport "payment", acViewPreview

DoCmd.OutputTo acOutputReport, "payment", xls, a

وللاسف يعطيني رسالة الخطأ التاليه

رابط هذا التعليق
شارك

لا اعلم لماذا تريد نسخة من التقرير على مستند وورد

وحفظها كصورة اولى حتى لا يتم التعديل عليها

الافضل عند محاولاتك ان ترفق مثالك لتشخيص المشكلة

رابط هذا التعليق
شارك

اخي الحبيب ابو خليل

اشكرك شكرا جزيلا على صبرك وتحملك لي

فعلا كلامك مضبوط اخي طالما نريد صورة من التقرير فمن البديهي ان تكون صورة وليست ملف ورد

وتقريبا كده الحل اصبح تمام بفضل الله اولا ثم بفضلكم انتم احبابي مشرفي واداري المنتدى

وانا اختار اخر اختيار( snapshot format)فيعطيني صورة بامتداد snp

فبارك الله فيكم جميعا

وايضا تم اكتشاف طريقة اخرى وهي

عند معاينة اي تقرير ثم الطباعة بدل من ان تختار الطابعة تختار

Microsoft Office Document Image Writer

وبذلك يعطينك نسخة من التقرير على شكل صورة بامتدادtif

تم تعديل بواسطه شبوكشي
رابط هذا التعليق
شارك

احسن الله اليك اخي الحبيب ابو خليل وجزيتم الجنة اللهم امين وجميع العاملين بهذا المنتدى المتميز

والى اللقاء في استفسار جديد في عالم الاكسس

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

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information