m_fouad0003

اخى الكريم أولا بارك الله فيك 

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

ارجو تعديل الكود ولحضرتك جزيل الشكر مقدما

اشكرك اخى على اهتمامك ومرفق المثال للتعديل

تصدير للورد.accdb

بسم  الله الرحمن الرحيم

    LWordDoc.Visible = True
    LWordDoc.ActiveDocument.Bookmarks("A1").Select
    LWordDoc.Selection.InsertAfter b1
    LWordDoc.ActiveDocument.Bookmarks("A2").Select
    LWordDoc.Selection.InsertAfter b2
    LWordDoc.ActiveDocument.Bookmarks("A3").Select
    LWordDoc.Selection.InsertAfter b3
    LWordDoc.ActiveDocument.Bookmarks("A4").Select
    LWordDoc.Selection.InsertAfter b4
    LWordDoc.ActiveDocument.Bookmarks("A5").Select
    LWordDoc.Selection.InsertAfter b5
LWordDoc.Application.Documents(Format(Now(), "dd_mm_yyyy_hh_mm_AM/PM") & ".docx").Save
LWordDoc.Quit
    Set LWordDoc = Nothing
 هذا الكود يقوم موجود فى زر امر ويقوم بتصدير السجل الحالى فقط الى الورد 

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

بسم الله الرحمن الرحيم

السادة الافاضل

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

وشكرا لتفضلكم بمساعدتى

بسم الله الرحمن الرحيم

الاخوة الكرام برجاء التكرم بمستعدتى فى تعديل هذا الكود

DoCmd.OpenReport "الشهادات", acViewPreview, , "[اسم الطالب]=" & "'" & [اسم الطالب] & "'" And "[اسم الامتحان]=" & Me![h]
 

حيث انىى ارغب فى فتح التقرير بناء على شرطين وليس شرط واحد

ولكم جزيل الشكر

بسم الله الرحمن الرحيم

الاحوة الاعضاء

استفسار لماذا الاستعلامات الاجرائية مثل استعلام الحذف واستعلام التحديث عند اضافة معيار لا تعمل على اوفيس 2016 

وما هى الطريقة الصحية لاضافة المعيار فى الاستعلام لاوفيس 2016 وشكرا

اتمنى ان الاجابة عند اي من السادة المشرفين

بسم الله الرحمن الرحيم 

الاخوه الكرام اعضاء منتدنا الغالى

اريد ان اعرف ما هو الفرق بين اضافة كأن الباركود او اضافة مربع النص وجعل الخط باركود39 فى التقرير وايهم افضل وشكرا

اخى الكريم  saleh204

اشكرك على ردك و على الكود الرائع بارك الله فيك  

اخى الكريم 

اشكرك على ردك ولكن اين الكود الذى يمكن ان استخدمه 

بسم الله الرحمن الرحيم 

الاخوه الكرام اعضاء منتدنا الغالى

لقد قمت بعمل هذا الكود لارسال التقرير بالاميل وهو يعمل بشكل جيد ولاكن المشكل تظهر عندما اقوم بالغاء عمليه الارسال تظهر رسالة خطا 

فارجور من السادة اعضاء منتدنا الكرام مساعدتى فى تعيل الكود بحيث اذا الغيت الارسال لا تظهر رسالة الخطا 

هذا هو الكود

DoCmd.SendObject acSendReport, "Report1", acFormatPDF, [ff], ""
وشكرا جزيل 

شكرا جزيل اخى الكريم ابو ياسين هذا هو المطلوب بالظبط وجزاك الله خيرا

بسم الله الرحمن الرحيم 

الاخوه الكرام اعضاء منتدنا الغالى

ارجو من سيادتكم مساعدتى فى كود يمكنى من تصدير تقرير الفاتورة بصيغة pdf  ويكون اسمه برقم الفاتورة 

وشكرا جزيل