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

طريقة طباعة تقرير لسجل معين وبمواصفات اخرى


cocacola7

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

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

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

اريد طباعة سجل بشرط ان يكون هو السجل الحالي المعروض في النموذج , واريد ان يكون عدد النسخ بعدد الطرود بحيث يكون عند طباعة  النسخة الاولى يكتب فيها 1 من كذا .

فمثلا عند يكون معروض في النموذج العميل محمد اليافعي ذات الرقم 10001 والذي عدد طروده 3 . فعند الضغط على زر الطباعة يتم طباعة هذا العميل فقط وايضا يكون عدد النسخ المطبوعة بعدد طرود العميل بحيث تكون النسخة الاولى مكتوب فيها 1 من 3 والنسخة الثانية 2 من 3 والنسخة الثالثة 3 من 3.

وهكذا بالنسبة لبقية العملاء .

 

ارجو منكم التكرم بمساعدتي , ولكم جNEW FROM NUM.accdbNEW FROM NUM.accdbزيل الشكر والامتنان 

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

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

شكرا لك اخي , ولكن المرفق لا يعمل ...

في ٢٦‏/٦‏/٢٠٠٦ at 04:36, zahrah2016 said:

اخي الفاضل شاهر

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

الكود موجود تحت زر امر الطباعة

CopyN_Report.rar

 

اختكم

زهره

 

4 ساعات مضت, محمد أبوعبدالله said:

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

تفضل اخي الكريم

NEW FROM NUM.rar 48.2 kB · 0 تنزيلات

تحياتي

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

شكرا اخي , ولكن المرفق لا يعمل

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

في ٢٦‏/٦‏/٢٠٠٦ at 04:36, zahrah2016 said:

اخي الفاضل شاهر

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

الكود موجود تحت زر امر الطباعة

CopyN_Report.rar

 

اختكم

زهره

 

 

صباح النور عليكم جميعا 

هل ممكن تتكرموا وتنظروا الى طلبي ايها المبرمجين العباقرة . 

 

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

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

السلام عليكم 

اعتقد انني لم استطع ايصال الفكرة لكم بالشكل الصحيح, لذا فقد عدلت على المرفق بحيث يكون واضح للجميع .

وفقكم الله واسعدكم , واتمنا من سعادتكم حل هذه المشكلة التي لدي.

 

لكي تفهموا اكثر افتحوا المرفق وبإذن الله سوف تفهوا المطلوب.

NEW FROM NUM.accdb

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

25 دقائق مضت, اشرف said:

السلام عليكم cocacola7

جرب كدة اتمني ان يكون المطلوب

NEW FROM NUM (1).accdb 704 kB · 0 تنزيلات

اشكرك اخي الاستاذ اشرف 

الطباعة للسجل الحالي تمام  ولكن  باقي ان يكون مكتوب على النسخة الاولى 1 من كذا والثانية 2 من كذا وهكذا استنادا على عد الطرود .

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

4 ساعات مضت, cocacola7 said:

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

شكرا اخي , ولكن المرفق لا يعمل

هل الكود لا يعمل ام الملف نفسه الذي لا يعمل

رفع لك الملف مرة اخرى بدون ضغط

NEW FROM NUM.accdb

تحياتي

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

منذ ساعه, محمد أبوعبدالله said:

هل الكود لا يعمل ام الملف نفسه الذي لا يعمل

رفع لك الملف مرة اخرى بدون ضغط

NEW FROM NUM.accdb 432 kB · 0 تنزيلات

تحياتي

فعلا هو المطلوب , اشكرك كثيرا  وربنا ينفع بعلمك الجميع ويجزيك الخير 

 

ممكن تشرح لي ماهي الطريقة التي استخدمتها ؟

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

تم استخدام for i >>> next لتكرار امر الطباعة حسب العدد الموجود بحقل CARNUM

    For i = 1 To Forms!cusform!CARNUM
        DoCmd.OpenReport "cusreport", acViewNormal, , "CUSNUM = " & Forms!cusform!CUSNUM
    Next

ثم استخدمنا المتغيير العام i في خقل X5 الموجود في التقرير ليكتب عدد النسخ

 

Public i As Integer
Private Sub تفصيل_Format(Cancel As Integer, FormatCount As Integer)

    Me.x5 = i

End Sub

تحياتي

 

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

51 دقائق مضت, محمد أبوعبدالله said:

تم استخدام for i >>> next لتكرار امر الطباعة حسب العدد الموجود بحقل CARNUM


    For i = 1 To Forms!cusform!CARNUM
        DoCmd.OpenReport "cusreport", acViewNormal, , "CUSNUM = " & Forms!cusform!CUSNUM
    Next

ثم استخدمنا المتغيير العام i في خقل X5 الموجود في التقرير ليكتب عدد النسخ

 


Public i As Integer

Private Sub تفصيل_Format(Cancel As Integer, FormatCount As Integer)

    Me.x5 = i

End Sub

تحياتي

 

فعلا خبير وتستاهل اكثر من ذلك الاسم , وفقك الله 

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

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

  • 2 weeks later...

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

كيف اخي محمد    اتمنا ان تكون في صحة جيدة .

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

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

شكرا لك مقدما .

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

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