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

تصدير التقرير الى ملف pdf بشرط


kaser906

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

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

هذا الكود يقوم بفتح التقرير على السجل المحدد

Dim stDocName As String
stLinkCriteria = "[Num_Itinerary_ID]=" & Me![Num_Itinerary]
stDocName = "Rpt_1"
DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria

وهذا كود تصدير التقرير الى ملف pdf

DoCmd.OutputTo acOutputReport, "Rpt_1", acFormatPDF, , True, , , acExportQualityPrint

المطلوب :

اضافة الشرط الى كود تصدير التقرير الى ملف pdf

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

ممكن مثال

3 دقائق مضت, kaser906 said:

مع الاسف أخي ابو ياسين يتم فتح التقرير بدون تصفية ( الشرط المحدد)

:fff:

شوف يمكن تعمل الشرط في مصدر التقرير

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

توصلت لطريقة

فتح التقرير أولا هكذا بالوضع المخفي

    DoCmd.OpenReport stDocName, acViewReport, , stlinkcriteria, acHidden

ومن ثم يتم تنفيذ أمر تصدير التقرير

لا أعلم ان كانت هناك طريقة مختصرة

الف شكر اخي ابو ياسين

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

21 دقائق مضت, kaser906 said:

لكن القصد من وضع الشرط خلف زر الأمر هو الاستفادة من فتح التقرير وتصفيته من اكثر من نموذج

دائما اذا بترفقون نسخة مصغرة من قاعدة بياناتكم راح توصلون الى النتيجة باسرع وقت ممكن :fff:

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

فعلا أستاذ شفان كلامك صحيح

لكن تخبر أن بعض الامثلة محتاجة بيانات

للتطبيق وهذا الأمر ممل :wallbash:

شكرأ لمرورك وإطلالتك على الموضوع  :fff:

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

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information