اخوانى الكرام خبور خير ، ziad ali
اشكركما على المجهود الرائع واستجابتكما السريعة
فعلا عمل رائع خاصة ما تفضل به الاخ الكريم خبور خير من تحويل المعادلات الى قيم
حيث ان عدد المعادلات فى الملف الخاص بى سيصل الى 39420 معادلة مما سيؤدى الى بطء شديد عند تغيير اى من القيم المرتبطة بالمعادلات
اخوانى الكرام
هل يمكن تنفيذ ذلك من خلال الكود Application.WorksheetFunction.SumProduct دون ان تظهر رسالة الخطأ type mismatch
وايهما اسرع فى التنفيذ
طريقة الكود Application.WorksheetFunction.SumProduct
ام طريقة المعادلات .Formula = "=SUMPRODUCT((R5C1:R30C1=RC5)*(R5C2:R30C2=R5C),R5C3:R30C3)"
واشكر لكما اهتمامكما مرة اخرى.