Function GetFormula(Cel As Range)
GetFormula = Cel.Formula
If Cel.HasArray Then GetFormula = "{" & Cel.Formula & "}"
End Function
وهذه معادلة بطريقة المصفوفة ..............=INDEX($IM$2:$IP$325;MATCH(O2&"-"&P2;$IN$2:$IN$325&"-"&$IM$2:$IM$325;0);4)
واحتاج الي عمل طريقة بالكود بعد كتابة المعادلة في الخلية بتحويلها الي مصفوفة بدل الضغط علي كنترول وشيفت وانتر وهل الكود اعلاه هو المطلوب وما طريقة تشغيله
شكرا