السلام عليكم
=======
طلبك هذا مهم جدا اظنك تقصد الطالب الحاصل على النهاية العظمى ولم يحصل على %30 فى امتحان التحريرى
طيب طلبك الاول لو كنت فهمتك صح سوف تزيد شرط الدوائر الى الكود التالى
If IsNumeric(Cells(R, C.Column)) And Not IsEmpty(Cells(R, C.Column)) And (C.Value < Cells(R, C.Column) [color=#ff0000]Or Cells(R + 8, C.Column) < "15"[/color] Or C.Value = "غ" Or C.Value = "صفر") Then
الجزء باللون الاحمر هو الزيادة
جرب المرفق وباقى الطلبات ستكون سهلة
HH شهادات.rar