كيفية استخدام وظيفة vba npv؟

تم إدراج ميزة VBA NPV في الفئة المالية لميزات VBA. عند استخدامه في التعليمات البرمجية لـ VBA، فإنه يحسب صافي القيمة الحالية للاستثمار باستخدام معدل الخصم وسلسلة من التدفقات النقدية المستقبلية . يمكنك معرفة المزيد عن صافي القيمة الحالية من هنا.

بناء الجملة

NPV (المعدل، صفيف القيمة)

الحجج

• المعدل : معدل الخصم على مدى فترة (يجب تقديمه في شكل عشري).
• ValueArray : جدول التدفق النقدي الذي يمثل المدفوعات والإيرادات. ستكون المدفوعات بقيم سالبة والإيرادات بقيم موجبة [يجب أن تحتوي على قيمة سالبة واحدة على الأقل وقيمة موجبة واحدة على الأقل].

مثال

لفهم كيفية استخدام وظيفة VBA NPV بشكل عملي، يجب عليك الاطلاع على المثال أدناه حيث قمنا بكتابة كود vba باستخدامها:

 Sub example_NPV() Dim cF(0 To 9) As Double Dim dRate As Double cF(0) = -1000 cF(1) = 213.6 cF(2) = 259.22 cF(3) = 314.6 cF(4) = 381.79 cF(5) = 463.34 cF(6) = 562.31 cF(7) = 682.42 cF(8) = 828.19 cF(9) = 1005.09 Range("A1").Value = NPV(dRate, cF) End Sub

في الكود أعلاه، استخدمنا صافي القيمة الحالية لحساب صافي القيمة الحالية للاستثمار. استخدمنا -1000 كمبلغ الاستثمار الأولي والدفعات التسعة الواردة ونتيجة لذلك تم إرجاع 3710.

تعليقات

• إذا كانت المصفوفة التي قدمناها لا تحتوي على قيمة سالبة وقيمة موجبة، فسيقوم VBA بإرجاع خطأ وقت التشغيل 5.