الفئات العمرية

[بوكفوس عبدالسلام]

السلام عليكم ...

لدي إستعلام ( العمر ) ، أريد من خلاله أن أستخرج تقريرين : الأول حسب طبيعة الإعاقة ( ملف مرفق ) و الثاني حسب الجنس ( ملف مرفق)
بحيث عندما أختار العمر بين عمرين ( مثلاً : من 03 إلى 10 سنوات ) يظهر لي النتائج المرجوة .

تقبلوا تحياتي الخالصة .

الفئة العمرية حسب الجنس.docx الفئة العمرية حسب طبيعة الإعاقة.docx Handicapées National.rar

[kaser906]

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

تفضل

Private Sub تفصيل_Print(Cancel As Integer, PrintCount As Integer)
Me.T21 = DCount("[العمر]", "[العمر]", "[العمر]between 0 AND 14 and[الجنس]= 'ذكر'")
Me.T22 = DCount("[العمر]", "[العمر]", "[العمر]between 15 AND 20 and[الجنس]='ذكر'")
Me.T23 = DCount("[العمر]", "[العمر]", "[العمر]between 21 AND 30 and[الجنس]='ذكر'")
Me.T24 = DCount("[العمر]", "[العمر]", "[العمر]between 31 AND 40 and[الجنس]='ذكر'")
Me.T25 = DCount("[العمر]", "[العمر]", "[العمر]>=41 and[الجنس]='ذكر'")


Me.T27 = DCount("[العمر]", "[العمر]", "[العمر]between 0 AND 14 and[الجنس]='أنثى'")
Me.T28 = DCount("[العمر]", "[العمر]", "[العمر]between 15 AND 20 and[الجنس]='أنثى'")
Me.T29 = DCount("[العمر]", "[العمر]", "[العمر]between 21 AND 30 and[الجنس]='أنثى'")
Me.T30 = DCount("[العمر]", "[العمر]", "[العمر]between 31 AND 40 and[الجنس]='أنثى'")
Me.T31 = DCount("[العمر]", "[العمر]", "[العمر]>=41 and[الجنس]='أنثى'")




Me.T51 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='حركي' and[الجنس]='ذكر'")
Me.T52 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='ذهني' and[الجنس]='ذكر'")
Me.T53 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='سمعي' and[الجنس]='ذكر'")
Me.T54 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='بصري' and[الجنس]='ذكر'")
Me.T55 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='متعدد الإعاقة' and[الجنس]='ذكر'")


Me.T58 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='حركي' and[الجنس]='أنثى'")
Me.T59 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='ذهني' and[الجنس]='أنثى'")
Me.T60 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='سمعي' and[الجنس]='أنثى'")
Me.T61 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='بصري' and[الجنس]='أنثى'")
Me.T62 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='متعدد الإعاقة' and[الجنس]='أنثى'")
End Sub

::بالتوفيق::

Handicapées Nationa-kaser906l.rar

[بوكفوس عبدالسلام]

بارك الله فيك على مجهودك القيّم

[أبو إبراهيم الغامدي]

أهلا بكم..

هناك دالة في أكسس اسمها (Partition) تقوم بتقسيم (القيمة) بين حدين وبنمط متكرر.. أرجو أن تفيدكم في تقسيم الفئات العمرية وأمثالها..

تجدون شرح لها على هذا الرابط  Partition

[بوكفوس عبدالسلام]

أخي الفاضل Kaser906، من الملاحظ في قاعدة البيانات أن عدد المعوقين الإجمالي هو 771 ، بينما في الإحصائيات الموجودة في الجدولين يبدو لي هناك خلل مثلا : 

الفئة من 21 إلى 30  = 792  ، الفئة من 31 إلى 40  = 900 ، الفئة أكثر من 41   = 2316

فمن المفروض أن تكون الإحصائيات و مجاميعها تساوي مجموع المعوقين و هو 771 أو أقل.

[kaser906]

أخي الكريم

البرنامج بحاجة الى اعادة صياغة علاقات الجداول

14 دقائق مضت, بوكفوس عبدالسلام said:

فمن المفروض أن تكون الإحصائيات و مجاميعها تساوي مجموع المعوقين و هو 771 أو أقل.

سبب ذلك انك وضعت بالاستعلام جداول ليست مرتبطه ببعضها

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

[بوكفوس عبدالسلام]

صدقت أخي Kaser906 ، الإشكال هو في الربط بين الإستعلام ( البلديات ) و الإستعلام ( الإجمالية ) في حقل البلدية ، لأن في السابق يضاعف الشخص الواحد بعدد البلديات الستة ( 6 مرات )، تم حل الإشكال و الإحصائيات معقولة الآن.

بارك الله فيك مجددا.

فيما يخص الشطر الثاني المتعلق بطبيعة الإعاقة حبّذا لو يكون الجدول طبيعة الإعاقة و الفئات العمرية و البلديات ( لأن في جدولك طبيعة الإعاقة و الجنس ) ، و أنا لا أريد حقل الجنس في هذه الحالة.

و شكراً مجدداً.

Handicapées -kaser906l.rar

[kaser906]

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

اذا واجهت مشاكل

صمم التقرير الذي تريده وضعه بالمرفق

وابشر بالخير

::بالتوفيق::

[jjafferr]

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

 

اخي كاسر 🙂

الكود اللي استعملته ، بإستخدام الامر Dcount ، واللي هو عبارة عن استعلام خاص للجمع 🙂

فانت تعمل 20 استعلام لتحصل على المطلوب 🙂

 

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

 

SELECT Abs(Sum([العمر] Between 0 And 14 And [الجنس]='ذكر')) AS T21, Abs(Sum([العمر] Between 15 And 20 And [الجنس]='ذكر')) AS T22, Abs(Sum([العمر] Between 21 And 30 And [الجنس]='ذكر')) AS T23, Abs(Sum([العمر] Between 31 And 40 And [الجنس]='ذكر')) AS T24, Abs(Sum([العمر]>=41 And [الجنس]='ذكر')) AS T25, Abs(Sum([العمر] Between 0 And 14 And [الجنس]='أنثى')) AS T27, Abs(Sum([العمر] Between 15 And 20 And [الجنس]='أنثى')) AS T28, Abs(Sum([العمر] Between 21 And 30 And [الجنس]='أنثى')) AS T29, Abs(Sum([العمر] Between 31 And 40 And [الجنس]='أنثى')) AS T30, Abs(Sum([العمر]>=41 And [الجنس]='أنثى')) AS T31, Abs(Sum([طبيعة الإعاقة]='حركي' And [الجنس]='ذكر')) AS T51, Abs(Sum([طبيعة الإعاقة]='ذهني' And [الجنس]='ذكر')) AS T52, Abs(Sum([طبيعة الإعاقة]='سمعي' And [الجنس]='ذكر')) AS T53, Abs(Sum([طبيعة الإعاقة]='بصري' And [الجنس]='ذكر')) AS T54, Abs(Sum([طبيعة الإعاقة]='متعدد الإعاقة' And [الجنس]='ذكر')) AS T55, Abs(Sum([طبيعة الإعاقة]='حركي' And [الجنس]='أنثى')) AS T58, Abs(Sum([طبيعة الإعاقة]='ذهني' And [الجنس]='أنثى')) AS T59, Abs(Sum([طبيعة الإعاقة]='سمعي' And [الجنس]='أنثى')) AS T60, Abs(Sum([طبيعة الإعاقة]='بصري' And [الجنس]='أنثى')) AS T61, Abs(Sum([طبيعة الإعاقة]='متعدد الإعاقة' And [الجنس]='أنثى')) AS T62
FROM العمر;

 

ومن استعلام واحد حصلت على جميع نتائجك 🙂

.

وعملت نسخة من تقريرك ، وحذفت الكود ، وحفظته باسم rpt_NEW ، وكله تمام 🙂

بس الفرق هو ، سرعة اظهار التقرير 🙂

 

جعفر

1051.Handicapées -kaser906l.accdb.zip

[kaser906]

53 دقائق مضت, jjafferr said:

بس الفرق هو ، سرعة اظهار التقرير 🙂

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

حياك اللله استاذي

فعلا يوجد افرق في سرعة فتح التقرير

يعطيك الف عافية

[shawky75140]

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