ترجع Double يحدد معدل العائد الداخلي لسلسلة من التدفقات النقدية الدورية (الدفعات والإيصالات).
بناء الجملة
IRR(values () [, guess ] )
يحتوي بناء جملة الدالة IRR على الوسيطات التالية:
| الوسيطة | الوصف |
|---|---|
| القيم () | مطلوبة. صفيف مزدوج يحدد قيم التدفقات النقدية. يجب أن يحتوي الصفيف على قيمة سالبة واحدة على الأقل (دفعة) وقيمة موجبة واحدة (إيصال). |
| تخمين | اختيارية. المتغير الذي يحدد القيمة التي تقدرها سيتم إرجاعه بواسطة الدالة IRR. إذا تم حذف الوسيطة guess، فسيكون 0.1 (10 في المائة). |
ملاحظات
إن نسبة العائد الداخلي هي معدل الفائدة التي يتم استلامها لاستثمار يتألف من دفعات وإيصالات تحدث على فترات زمنية منتظمة.
تستخدم الدالة IRR ترتيب القيم ضمن الصفيف لتفسير ترتيب الدفعات والإيصالات. تأكد من إدخال قيم الدفع والإيصالات بالتسلسل الصحيح. ليس من الضروري أن يكون التدفق النقدي لكل فترة ثابتا، كما هو الحال في المرتب الدوري.
يتم حساب IRR حسب التكرار. بدءا من قيمة التخمين، تنقل الدالة IRR بين العمليات الحسابية حتى يصبح الناتج دقيقا في حدود 0.00001 بالمائة. إذا لم يتمكن IRR من العثور على نتيجة بعد 20 محاولة، فستفشل.
مثال
ملاحظة
توضح الأمثلة التالية استخدام هذه الدالة في وحدة نمطية ل Visual Basic for Applications (VBA). لمزيد من المعلومات حول استخدام VBA، حدد "مرجع المطور" في القائمة المنسدلة بجوار "بحث" وأدخل مصطلح أو أكثر في مربع البحث.
في هذا المثال، ترجع الدالة IRR معدل العائد الداخلي لسلسلة من 5 تدفقات نقدية موجودة في الصفيف Values(). إن عنصر الصفيف الأول هو تدفق نقدي سالب يمثل تكاليف بدء العمل التجاري. تمثل التدفقات النقدية الأربعة المتبقية تدفقات نقدية موجبة للسنوات الأربع التالية.
Guess هو معدل العائد الداخلي المقدر.
Dim Guess, Fmt, RetRate, Msg
Static Values(5) As Double ' Set up array.
Guess = .1 ' Guess starts at 10 percent.
Fmt = "#0.00" ' Define percentage format.
Values(0) = -70000 ' Business start-up costs.
' Positive cash flows reflecting income for
' four successive years.
Values(1) = 22000 : Values(2) = 25000
Values(3) = 28000 : Values(4) = 31000
' Calculate internal rate.
RetRate = IRR(Values(), Guess) * 100
Msg = "The internal rate of return for these " & _
"five cash flows is "
Msg = Msg & Format(RetRate, Fmt) & " percent."
MsgBox Msg ' Display internal return rate.