مساعدة في شيت كنترول ( الطلاب المسيحيين )

[الظرنبيط]

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

بعد مساعدتكم في تصميم هذا الشيت واجهتني مشكلة مادتي ( القرآن الكريم و الفقة )

ومجموع كل مادة منهما 30 درجة

وهي الطلاب المسيحيين أو الطلاب الذين يمتحنون المادة المسيحية والتي درجتها 60 درجة

أي تمثل مجموع درجات القرآن والفقة

وأريد اضافة هذه المادة في الشيت دون أن يتسبب في خلل بالشهادة ( مرفقة مع المشاركة )

وأن تظهر النتيجة للطلاب المسيحيين بدون القرآن والفقة ويظهر بديلهما المادة المسيحية

ملحوظات :

هذا الشيت يضم 1406 تلميذ 42 مدرسة فهو امتحان لوحدة كاملة ( أكثر من مدينة واحدة )

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

اريد طباعة الشهادة على مستوى الوحدة وليس حسب المدارس

وحدة.rar

[الظرنبيط]

للرفع !

[طارق محمود]

السلام عليكم

أخي العزيز

أضفت العمود G للمادة المسيحية ووضعت لك الكود التالي في حدث الورقة

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

r = Target.Row

[E:G].EntireColumn.Hidden = False

If Cells(r, "G") = "n" Or Cells(r, "G") = "N" Then [G:G].EntireColumn.Hidden = True: Exit Sub

If Cells(r, "E") = "n" Or Cells(r, "E") = "N" Or _

Cells(r, "F") = "n" Or Cells(r, "F") = "N" Then [E:F].EntireColumn.Hidden = True

End Sub

وكل ماعليك

أن تكتب الحرف n أو N أمام كل طالب في غير ديانته

وسيخفي الكود أوتوماتيك عمود الديانة الذي به الحرف n أو N عندما تقف بالماوس علي أي خلية بصف الطالب

جرب المرفق

وحدة دنقلا2.rar

[الظرنبيط]

ظهور مادتي القرآن والفقة للمسيحين في النتيجة

ظهور مادة المسيحية للمسلمين في النتيجة