• 0
mkmk

تصدير التقارير الى ورد

سؤال

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

السادة المشرفين و جميع الاعضاء الموقرين

ارجو منكم المساعدة فى هذة المشكله

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

بحيث تكون عن طريق زر فى النموذج

و شكرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

17 إجابة على هذا السؤال .

  • 0

اخي الفاضل

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

يمكن تصدير التقرير الى ملف Ms Word حسب الكود التالي

هذا الكود يوضع تحت زر امر في النموذج

Private Sub ExportToWord_Click()
DoCmd.OutputTo acReport, "MyReport", "RichTextFormat(*.rtf)", "C:\ZAHRAH.DOC", True, "", 0
End Sub

حيث ان MyReport هو اسم التقرير الخاص بك

و C:\ZAHRAH.DOC هو مسار ملف الوورد الذي سيتم انشاؤه من التقرير

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

عبارة True في اخر الكود تعني فتح ملف الوورد مباشرة بعد انشاؤه اذا لم ترغب في فتحه مباشرة فغيرها الى False

وهذا مثال عملي على عملية التصدير

Export_Report_To_Word.rar

اختكم

زهره

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

يعطيك العافية اختي زهرة ،

طيب عندي سؤال بسيط ، هذا الكود يقوم بتصدير كل السجلات لملف وورد ،

انا ابغى يقوم بتصدير السجل الحالي فقط

انتي اعطيتيني الكود هذا

Private Sub PreReport_Click()
Dim stLinkCriteria As String
stLinkCriteria = "[Customer_ID] =" & Me![Customer_ID]
DoCmd.OpenReport "ÊÞÑíÑ äÙÇã ÇáÚãáÇÁ", acViewPreview, , stLinkCriteria

End Sub

كيف استخدم الكود تبع التصدير لسجل الحالي فقط ؟

حاولت اعدل عليه ولم استطع :(

بنتظارك

ومشكورة مرة اخرى

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي الفاضل

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

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

هذا المثال بعد التعديل

Export_Report_To_Word_up.rar

اختكم

زهره

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

السلام عليكم

جزاك الله خيرا ، واحسن اليك ، واجزل لك العطاء

أخوكم

أبو آدم

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

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

الاخت / زهرة

الف شكر و جعله الله فى ميزان حسناتك

و شكرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

شكرا جزيلا على هذا الشرح الوافي والكافي وبارك الله فيك

وعندي ملاحظة صغي عسى ان تكون مفيدة

لكي لا تجعل المستخدم اظهار القائمة بالزر الايمن للماوس على النموذج عند اظهاره في وضع معاينة

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

وانا اقول يمكن جعل المستخدم لا يحصل على اي شيء عند النقر بزر الماوس الايمن وذلك

من خلال عرض النموذج في وضع تصميم واختيار خصائص النموذج واختيار الامر

غير ذلك ثم الامر قائمة مختصرة توضع امامها( لا ) وشكرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الاستاذه الفاضة زهره هل ممكن تغيير اسم الملف

الورد باسم صاحب التقرير اى حقل الاسم في التقرير اوى اشي يتعلق يستند اليه اوسم العميل

اوصنف وما الى ذك

ولك خالص الشكر والتقدير

تم تعديل بواسطه باهر
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بكل سرور اخي الكريم

يمكن تحقيق ذلك من خلال التعديل التالي

Private Sub ExportToWord_Click()
Dim strName As Variant
strName = [Reports]![MyReport]![Name].Value
DoCmd.OutputTo acReport, "MyReport", "RichTextFormat(*.rtf)", "C:\" & strName & ".DOC", True, "", 0
DoCmd.Close
End Sub

طبعا هذا الكود موجود تحت زر الامر في النموذج الذي يفتح مع التقرير مباشرة وشرح الكود كالتالي :

1. يتم التصريح DIM بإسم متغير strName ويكون هذا المتغير يقبل اي نوع البيانات سواء نص او رقم من خلال Variant

2. نجعل قيمة المتغير strName تساوي قيمة اي حقل نختاره من التقرير وطبعا هنا اخترنا حقل الاسم Name طبعا تستطيع تغييره بأي حقل من اسماء حقول التقرير مثل

رقم الموظف Number

او الوظيفة JOB

او الادارة Admins

3. يتم تنفيذ امر تصدير التقرير DoCmd.OutputTo acReport المسمى MyReport الخاص بنا في هذا المثال على شكل مستند وورد rtf وبما ان برنامج الوورد يتعرف على هذا النوع من الملفات فسيحوله مباشرة الى ملف doc لهذا سيتم التصدير الى محرك الاقراص C مضافا له اسم الحقل الذي اضفناه في المتغير

 "C:\" & strName & ".DOC"

طبعا سينتج لدينا ملف وورد بإسم الموظف مباشرة مثل doc.خالد ناصر قم بالتجربة بتغيير اي حقل تختاره سواء رقمي او نصي

وهذا هو المثال بعد التعديل

Export_Report_To_Word_up2.rar

اختكم

زهره

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

سلمت يداك وجزيتي الف الف خير وبارك فيكي

لدي استفسار لماذا عند تنسيق التقرير وتصدير الء الورد لاتظهر الجداول وفي بعض الحالات تتكير النصوص

واريد مثل مثل المثال السابق بتصدير snapshot

وفي الاخير الله لايحرمانا منكي وجعل الله بكل حرف من الحرف حسنه ومحي عنكي الف الف سيئة

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

كما تعلم اخي الكريم ان التقارير في برنامج الاكسيس عبارة عن صيغة rpt وليست مستندات عاديه مثل برنامج الوورد لهذا لا تظهر الخطوط او الجداول المحيطه بالنص فقط الذي يتم تصديره هي النصوص فقط . زلكن يوجد امكانية في الوورد بعد تصدير التقرير اليه ان تضع البيانات في جدول بطريقة بسيطه وسهله من خلال الوورد .

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

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الاستاذه الكريمه زهره

بارك الله فيكي حقيقة كفيتي ووفيتي

اثابكي الله عني وعن جمع من يحتاج الى مساعدة الف خير

واطال الله عمركي

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

يوجد عندي برنامج في الاكسس خاص بالطلاب في المدرسة

وقد اعجبني المثال الذي تم وضعه في المنتدى والخاص بفتح التقرير لشخص معين

وعند محاواتي لتطبيقه على الطلاب بحيث يفتح زر الامردرجات الطالب الذي نقف عنده

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

والحل عندك

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

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

فقط لي سؤال حول الموضوع

إفرضي أن التقرير المصدر ليس بالطول بل بالعرض مثلا مسير استحقاق موظفين

وأرغب تصديره للورود بشكل أفقي أيضا فكيف يتم ذلك ؟

وفقك الله

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بارك الله فيك اختي زهره

اختي الكريمه

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

وحصلت على المطلوب في هذا الموضوع

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

ارجو ان يكون مطلوبي واضح

تحياتي واحترامي

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

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

0

شارك هذا الرد


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

عزيزي الباشق...

إجابة سؤالك موجودة في نفس الموضوع. :)

تقبل تحياتي.

عبارة True في اخر الكود تعني فتح ملف الوورد مباشرة بعد انشاؤه اذا لم ترغب في فتحه مباشرة فغيرها الى False

اختكم

زهره

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

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

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



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .