Alaaq3 قام بنشر أبريل 9, 2022 مشاركة قام بنشر أبريل 9, 2022 السلام عليكم ورحمة الله : احصائية.xlsmاريد احضائية بيانات تظهر على الفورم معرفة عدد الذكور ..عدد الاناث.. عدد الاذكور البالغين الموظفين .. عدد الذكور البالغين العاطلين ... عدد الذكور الاحداث الموظفين ... الخ احصائية.xlsm رابط هذا التعليق شارك More sharing options...
أفضل إجابة ابراهيم الحداد قام بنشر أبريل 9, 2022 أفضل إجابة مشاركة قام بنشر أبريل 9, 2022 السلام عليكم ورحمة الله جعل الكود هكذا Private Sub UserForm_Initialize() Label6 = WorksheetFunction.CountIf(Range("B2: B22"), "ذكر") Label7 = WorksheetFunction.CountIf(Range("B2: B22"), "انثى") Label8 = WorksheetFunction.CountIfs(Range("B2: B22"), "ذكر", Range("C2: C22"), _ "بالغ", Range("D2: D22"), "موظف") Label9 = WorksheetFunction.CountIfs(Range("B2: B22"), "ذكر", Range("C2: C22"), _ "بالغ", Range("D2: D22"), "عاطل") Label10 = WorksheetFunction.CountIfs(Range("B2: B22"), "ذكر", Range("C2: C22"), _ "حدث", Range("D2: D22"), "عاطل") End Sub 4 1 رابط هذا التعليق شارك More sharing options...
Alaaq3 قام بنشر أبريل 9, 2022 الكاتب مشاركة قام بنشر أبريل 9, 2022 احسنت اخي الكريم : جزاك الله الف خير 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها