اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

طباعة التقرير الحالي فقط


Tarekfathallah

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

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

obeidi input1.rar

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

15 دقائق مضت, tarek_f26180 said:

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

obeidi input1.rar

مشاركة مع السيد @محمد ابوعبد الله

اتفضل اخي 

اضفت حقل اي دي في النموذج والتقرير

واضفت من الكود شرط اي دي يساوي اي دي

 "[id]=" & Me.ID

اي الكود سيكون كالتالي

    Dim stDocName As String

    stDocName = "R_mouamalat"
    DoCmd.OpenReport stDocName, acPreview, , "[id]=" & Me.ID

 

obeidi input1.rar

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

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

-------------------   للرفع -------------------

obeidi input2.rar

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

26 دقائق مضت, tarek_f26180 said:

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

-------------------   للرفع -------------------

obeidi input2.rar

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

اخي الكريم افتح تقاريرك واضف اليه حقل اي دي

لاننا اعطينا فتح عند شرط وهو

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

تحياتي

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

28 دقائق مضت, tarek_f26180 said:

السلام عليك اخ شيفان والاخوة الافاضل الرجاء تقييم المشروع وهل من فكرة افضل له لو سمحتم 

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

تقبل تحياتي

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

اخ شيفان لو سمحت كيف يمكنني كتابة السنة الحالية في تكست بوكس ويتغير تلقائيا كل سنة وشكراً لمرورك

لكي لا يزيد من مشاركاتي عملت تعديل على هذه المشاركة

مثلا عندك مربع نص باسم Text1 

اكتب في مصدره 

= Format(Date();"YYYY")

او في محرر الاكواد اكتب

Text1 = Format(Date();"YYYY")


 

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

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

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



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

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

Important Information