في هذا المرفق هي عبارة عن معادلات لم تكن موجودة مع دوال اكسل . ولكن هل بالإمكان ان حولها الي كود بسيط في اكسل ..
اريد كود نفس الكود التالي مع العلم أن الكود التالي هو لـ sumifs
XX = Application.WorksheetFunction.SumIfs(sh.Range("f11:f" & LR2), sh.Range("c11:c" & LR2), YY)
وشرحة كالتالي :
xx = متغير يتم تخزين القيمة الناتجة فية
f11: f = هو العمود الذي سوف نجمعه وهو الارقام يبتدى من f11 وحتى نهاية f وهو ( sum_range ) >>>
lr2 : هو متغير يقوم بأخذ قيمة اخر صف موجود فية البيانات من الاسفل وله الكود التالي ( LR2 = Cells(Rows.Count, 2).End(xlUp).Row ..
c11: c هو العمود الذي راح نبحث فية عن تطابق الكلمة وهو ( criteria _range ) >>
YY = وهو متغير يرمز للكلمة أو الرقم الذي نبحث عنه .. في العمود سي .. واسم هذا المتغير ( criteria ) >>
دالة MAXIF -MINIF.rar