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

[m.sma]

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

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

والتقارير المرسلة والغير مرسلة بواسطة الايميل والارامكس والبريد

تكون ال if لشرطين

مرفق لكم الملف

رعاكم الله

ايتام.rar

[الـعيدروس]

شرط لم يسلم هو خليه فارغه ""

ايتام_A.rar

[m.sma]

جزاك الله خير اخي ابو نصار

كتب الله اجرك

[m.sma]

اخي ابو نصار اكرمك الله

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

ما هو التعديل الصحيح

ايتام1111.rar

[m.sma]

في حال اردت رسالة توضح تكرار الرقم من غير ان تمنعني من ادخال الرقم

شاكر ومقدر تعاونك معي

[الـعيدروس]

جرب هكذا

حط المعادله في خلية " T9 " واسحب للأسفل

=SUMPRODUCT(--($C$2:$C$32=$R$10);--($A$2:$A$32=$S9))

[الـعيدروس]

لأي عمود تريد ظهور رسالة في حال أدخلت قيمة مكرره ؟؟

[m.sma]

العمود B رقم الجهة

[الـعيدروس]

انسخ الكود التالي في حدث الورقة

Private Sub Worksheet_Change(ByVal Target As Range)

    Select Case Target.Value

    Case "": Case Else

	    If Not Intersect(Target, [B:B]) Is Nothing Then

		    Select Case WorksheetFunction.CountIf([B:B], Target)

		    Case 1: Case Else

			    My_Mtch = WorksheetFunction.Match(Target, [B:B], 0)

			    My_Pro = " القيمة موجوده مسبقاً  في الخليه للإستمرار نعم للإلغاء لا $B$" & My_Mtch

			    If MsgBox(My_Pro & " : " & Target, vbYesNo, "تحقق تكرار") = vbNo Then Target.Clear: Exit Sub

		    End Select

	    End If

    End Select

End Sub

تم تعديل يناير 8, 2013 بواسطه عباد

[m.sma]

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

1- احتاج الى معادلة لتلوين الصف الموجود به المحدد

2- معادلة عدم تكرار رقم في نفس الصف لعدد من الاعمدة المتجاورة

بارك الله فيك