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

هل يوجد نموذج يطبع المستندات محدد من رقم ١ الى رقم ٢٠


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

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

عباقرة المنتدى 

اخواني الافاضل 

مطلوب نموذج لطباعة عدد محدد من المستندات المرقمة 

قمت بادخال مستندات على سبيل المثال من رقم ١ الى رقم ٤٠ 

المطلوب نموذج 

لتحديد الطباعة من ١ الى ٢٠ 

عبر حقل من الى حقل الى

بنفس طريقة اعدادات الطباعة  تحديد عدد صفحات من الى

ولكم الشكر

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

وعليكم السلام 🙂

 

اذا كان هذا الرقم ثابت ، فيمكنك ان تجعل رأس التقرير او/و الذيل طويل ، بحيث بالتجربة تقدر تحصل على عدد السجلات اللي تريدها ، وهذه اسهل طريقة ،

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

 

جعفر

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

شكرا استاذي الفاضل والعبقر الاستاذ جعفر

لم تفهم قصدي 

عندي اومر صرف نقدي بارقام متتالية 

بدل ما اكتب معيار ادخل رقم امر الصرف للطباعة 

من نموذج اكتب من امر صرف رقم ١٥ 

الى رقم امر صرف رقم ١٥٠ يقو م 

بطباعة جميع اوامر الصرف المحدد بين عدد البداية والنهاية 

حقل البداية  الى حقل النهاية 

من ١٥      الى               ١٥٠ 

يقوم بطباعة او امر الصرف المحدده 

وهذه الطريقة مشابهة لتحديد عدد الصفحات في اعدادات الطباعة 

من صفحة رقم.     الى. رقم

ولكن طلبي ارقام اوامر الصرف واليس الصفحات

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

هذه تعملها كما تعمل معيار بين تاريخين:

في الاستعلام ، في حقل رقم امر الصرف ، اكتب في المعيار :

>=Forms!frm_Main!From_A and <=Forms!frm_Main!To_A

 

ويكون عندك في النموذج frm_Main ، حقلي ، من امر صرف: From_A  ، والى امر صرف: To_A

 

جعفر

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

3 ساعات مضت, jjafferr said:

هذه تعملها كما تعمل معيار بين تاريخين:

في الاستعلام ، في حقل رقم امر الصرف ، اكتب في المعيار :


>=Forms!frm_Main!From_A and <=Forms!frm_Main!To_A

 

استاذي الفاضل جعفر اشكر اهتمامك وجزاك الله عني خيرا

تم تطبيق المعيار المرسل ولكنه يظهر صفحة واحده فيها جميع اوامر الصرف من ٩٨١ الى ٩٨٥

في صفحة واحده او امر واحد مثل الكشف وهذا 

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

الله يبارك في عمرك

تحديد بداية ونهاية اوامر الصرف.rar

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

اخذ مني وقت الى ان فهمت تقريرك 🙂

 

اجمع جميع كائنات التقرير ، الى قسم "التفصيل" Detail ، وخلاص 🙂

 

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

image.png.aefb9cd0b7472a09cfd5b48f3d66925a.png

.

خليه يكون

image.png.3159029d66d86dbaad2c47e8c84f49f2.png

.

والنتيجة

image.png.08a4854b9c93d387214c5f7096310957.png

 

جعفر

1271.تحديد بداية ونهاية اوامر الصرف.accdb.zip

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

بارك الله فيك استاذي جعفر 

وسدد الله خطاكم 

وضعت معيارين في رقم السند ومعيار  في الترقيم التلقائي 

عند استبعاد المعيار الذي في الترقيم التلقائي وتغيير الارقام من ١ الى ٦ بدلا من ٩٨١ الى ٩٨٥ الذي في الترقيم التلقائي 

ونقرت على زر المعاينة او الطباعة يظهر جميع التقارير خارج التحديد من ١- ٤ وهكذا 

هل يوجد حل 

وجزاك الله عني خير الجزاء استاذ جعفر

مرفق التغيير

المعيار لايطبق.rar

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

1 ساعه مضت, jjafferr said:

الاستعلام "امرصرف" مافيه معيار !!

وضعت المعيار كما اشرت يطبق عندما يكون في حقل الترقيم التلقائي وهذا مالا اريده

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

قد تم وضع عمل كود برمجي 

في المرفق التالي الا انه يقوم بطباعة نسختين مكرره 

اطال الله في عمرك استاذ جعفر 

وبارك الله فيك 

هل تستطيع حل المشكلة 

في الكود 

او في التحديد

تحديد طباعة السندات بين رقمين.rar

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

برنامجك شغال تمام حسب المعيار اللي استعملته انت ، فما اعرف شو المشكلة !!

 

5 ساعات مضت, طاهر الوليدي said:

وضعت المعيار كما اشرت يطبق عندما يكون في حقل الترقيم التلقائي وهذا مالا اريده

هذا استعلامك، والمعيار موجود في حقل رقم السند ، اما حقل الترقيم التلقائي فارغ ، ونتائج الاستعلام صحيحة !!

image.png.482baf568a396dd892bffd635cdebce1.png

.

 

يجب ان يكون الكود هكذا فقط ، ورجاء حذف جميع الاشياء الاخرى:

للمعاينة
    Dim stDocName As String
    stDocName = "امرصرف"
    DoCmd.OpenReport stDocName,acViewPreview

او فقط
    DoCmd.OpenReport "امرصرف",acViewPreview



للطباعة
    Dim stDocName As String
    stDocName = "امرصرف"
    DoCmd.OpenReport stDocName

او فقط
    DoCmd.OpenReport "امرصرف"


واما اذا اردت طباعة اكثر من نسخة من التقرير (انا اطبع نسختين) بالكود التالي
    Dim stDocName As String
    stDocName = "امرصرف"
    DoCmd.OpenReport stDocName, acViewPreview, , , acHidden
    DoCmd.SelectObject acReport, stDocName
    DoCmd.PrintOut acPages, , , acHigh, 2
    DoCmd.Close acReport, stDocName

.

جعفر

1271.2.تحديد طباعة السندات بين رقمين.accdb.zip

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

6 ساعات مضت, طاهر الوليدي said:

الله يبارك فيك استاذي الفاضل وبارك في ايامك واولادك 

تحديد طباعة السندات بين رقمين.rar 407 kB · 0 downloads

 

  • Like 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