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

[محمد التميمي]

 

السلام عليكم

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

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

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

 

New.rarFetching info...

تم تعديل يوليو 2, 2021 بواسطه محمد التميمي

[kanory]

تاكد اخي من المرفق

[محمد التميمي]

  في 2‏/7‏/2021 at 18:54, kanory said:

تاكد اخي من المرفق

Expand  

تفضل نسخة ثانية

New.rarFetching info...

[ابو جودي]

اتفضل  

 

New.accdbFetching info...

[محمد التميمي]

شكرا استاذي ولاكن

  يظهر التقرير بعد الطباعة سجل واحد فقط 

 

مع فائق الشكر والاحترام

تم تعديل يوليو 2, 2021 بواسطه محمد التميمي

[kanory]

  في 2‏/7‏/2021 at 19:24, محمد التميمي said:

شكرا استاذي ولاكن

  يظهر التقرير بعد الطباعة سجل واحد فقط 

 

مع فائق الشكر والاحترام

Expand  

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

 

New1.accdbFetching info...

[kanory]

وهذه طريقة ثانية بعد كوب القهوة .....

 

‏‏New1 - Kan.accdbFetching info...

[ابو جودي]

  في 2‏/7‏/2021 at 19:24, محمد التميمي said:

شكرا استاذي ولاكن

  يظهر التقرير بعد الطباعة سجل واحد فقط 

 

مع فائق الشكر والاحترام

Expand  

 

طيب بص

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

ولانى الان لا املك طابعة هذا هو المخرج بعد استخدام طابعة pdf  

وطبعا وجب التنبيه لانى تسرعت ان كان الفلتر متعدد لاكثر من قيمة لن تعمل تلك الطريقة ولذلك طريقة استاذى الجليل ومعلمى الاستاذ @kanory افضل اجابة 

 

Filters.pdfFetching info...

تم تعديل يوليو 2, 2021 بواسطه ابا جودى

[abouelhassan]

حفظكم الله وبارك فيكم جميعا يارب

[ابو جودي]

  في 2‏/7‏/2021 at 21:17, kanory said:

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

 

New1.accdb 660 kB · 0 downloads

Expand  

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

 

تم تعديل يوليو 2, 2021 بواسطه ابا جودى

[kanory]

  في 2‏/7‏/2021 at 21:56, ابا جودى said:

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

Expand  

هذا تواضع الكبار ..... تعلمنا منك الكثير من الافكار والابداع .... 

[ابو جودي]

  في 2‏/7‏/2021 at 22:01, kanory said:

 

Expand  

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

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

ولذلك طريقتكم استاذى الجليل ومعلمى القدير افضل غير انها ابسط من فكرتى بكثير 

ولهذا ومن اجل ذلك دائما يدين طالب العلم الى معلمه ..

جزاكم الله خيرا استاذى الجليل   

[محمد التميمي]

  في 2‏/7‏/2021 at 19:17, ابا جودى said:

اتفضل  

 

New.accdb 528 kB · 0 downloads

Expand  

 

  في 2‏/7‏/2021 at 21:44, ابا جودى said:

 

طيب بص

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

ولانى الان لا املك طابعة هذا هو المخرج بعد استخدام طابعة pdf  

وطبعا وجب التنبيه لانى تسرعت ان كان الفلتر متعدد لاكثر من قيمة لن تعمل تلك الطريقة ولذلك طريقة استاذى الجليل ومعلمى الاستاذ @kanory افضل اجابة 

 

 

Expand  

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

نعم فعلاً كما تفضلتم طريقة استاذنا الجليل kanory هي الارجح لان اختيار القيم متعدد

كل الشكر والامتنان لكم 

[محمد التميمي]

  في 2‏/7‏/2021 at 21:37, kanory said:

وهذه طريقة ثانية بعد كوب القهوة .....

 

 

Expand  

صباخ الخير والور والياسمين استاذي الجليل kanory 

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

دائماً كوب القهوة يعطي نتائج مبهرة

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

تم تعديل يوليو 3, 2021 بواسطه محمد التميمي

[محمد التميمي]

  في 2‏/7‏/2021 at 21:37, kanory said:

وهذه طريقة ثانية بعد كوب القهوة .....

 

‏‏New1 - Kan.accdb 540 kB · 5 downloads

Expand  

اخي واستاذي القدير   kanory   السلام عليكم

تم نقل الكود الى قاعدة البيانات الرسمية ويعمل بامتياز والفضل يعود اليكم

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

(( عند اكمال الفرز والضغط على زر طباعة ينفتح التقرير بالواجهة ومن الماوس بكلك يمين نتوصل الى امر الطباعة من القائمة ))

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

لك علية ابريق من القهوة الفاخرة عندما التقي بك ان شاء الله فالدنيا صغيرة

مع فائق الشكر

 

231.accdbFetching info...

[kanory]

  في 3‏/7‏/2021 at 14:45, محمد التميمي said:

اخي واستاذي القدير   kanory   السلام عليكم

تم نقل الكود الى قاعدة البيانات الرسمية ويعمل بامتياز والفضل يعود اليكم

Expand  

الفضل لله وحدة اخي الكريم ... بارك الله فيك

  في 3‏/7‏/2021 at 14:45, محمد التميمي said:

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

(( عند اكمال الفرز والضغط على زر طباعة ينفتح التقرير بالواجهة ومن الماوس بكلك يمين نتوصل الى امر الطباعة من القائمة ))

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

Expand  

غير هذا السطر
DoCmd.OpenReport "Filters", acViewPreview
بهذا السطر
DoCmd.OpenReport "Filters", acViewNormal

 

  في 3‏/7‏/2021 at 14:45, محمد التميمي said:

 

لك علية ابريق من القهوة الفاخرة عندما التقي بك ان شاء الله فالدنيا صغيرة

Expand  

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

[محمد التميمي]

  في 3‏/7‏/2021 at 15:14, kanory said:

 

غير هذا السطر
DoCmd.OpenReport "Filters", acViewPreview
بهذا السطر
DoCmd.OpenReport "Filters", acViewNormal

 

Expand  

اخي الكريم انا اسف لقد اتعبتك معي

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

[kanory]

طيب جرب المرفق ... بس بدون قهوة ... ههههه

ربما تأتي افكار اخرى ....

 

231.accdbFetching info...

[kanory]

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

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

DoCmd.OpenReport "Filters", acViewNormal

ووضعنا في حدث عند الفتح في التقرير هذا الكود الخاص بالفلتر 

Reports!Filters.Report.FilterOn = False
Reports!Filters.Report.Filter = Forms!frm_Form!Table1.Form.Filter
Reports!Filters.Report.FilterOn = True

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

اليك المرفق .....

 

Kan_233.accdbFetching info...

[محمد التميمي]

  في 4‏/7‏/2021 at 03:25, kanory said:

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

DoCmd.OpenReport "Filters", acViewNormal

ووضعنا في حدث عند الفتح في التقرير هذا الكود الخاص بالفلتر 

Reports!Filters.Report.FilterOn = False
Reports!Filters.Report.Filter = Forms!frm_Form!Table1.Form.Filter
Reports!Filters.Report.FilterOn = True

 

Expand  

السلام عليكم

صبحكم الله بالخير والعافية

تم تطبيق الاكواد على القاعدة الاساسية وتعمل بامتياز

بارك الله بجهودك السخية ورحم الله والديك في الدنيا والاخرة شكراً جزيلاً   

 

تم تعديل يوليو 4, 2021 بواسطه محمد التميمي

[yousef2018]

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

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

[ناقل]

  في 10‏/2‏/2022 at 19:56, yousef2018 said:

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

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

Expand  

اعتقد لو فتحت موضوع جديد وادرجت مرفق او مثال للمطلوب لكان افضل ... بارك الله فيك ..