NPV 函数 (Visual Basic for Applications)

2023-08-16 01:36| 来源: 网络整理| 查看: 265

NPV 函数项目 04/07/2023

返回一个 Double，它基于一系列定期现金流（付款和收款）和贴现率指定投资的净现值。

语法

NPV (速率，值 ( ) )

NPV 函数包含以下命名参数：

Part 说明率必填。指定以小数表示的期间内的贴现率的 Double。值 ( ) 必填。用于指定现金流值的双精度数组。该数组必须包含至少一个负值（付款）和一个正值（收款）。备注

投资的净现值是未来一系列付款和收款的当前值。

NPV 函数使用数组中的值的顺序来解释付款和收款的顺序。确保按正确的顺序输入付款和收款值。

NPV 投资在第一个现金流值的日期之前的一个期间开始，并以数组中的最后一个现金流值结束。

净现值计算基于未来现金流。如果第一个现金流发生在第一个周期开始时，则第一个值必须添加到 NPV 返回的值中，并且不能包含在值 ( ) 的现金流值中。

NPV 函数类似于 PV 函数 (当前值) ，只是 PV 函数允许现金流在期末或期初开始。与可变的 NPV 现金流值不同，PV 现金流在投资期间必须是固定的。

示例

此示例使用 NPV 函数返回数组 Values() 中包含的一系列现金流的净现值。 RetRate 表示固定的内部报酬率。

Dim Fmt, Guess, RetRate, NetPVal, Msg Static Values(5) As Double ' Set up array. Fmt = "###,##0.00" ' Define money format. Guess = .1 ' Guess starts at 10 percent. RetRate = .0625 ' Set fixed internal rate. 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 NetPVal = NPV(RetRate, Values()) ' Calculate net present value. Msg = "The net present value of these cash flows is " Msg = Msg & Format(NetPVal, Fmt) & "." MsgBox Msg ' Display net present value. 另请参阅函数 (Visual Basic for Applications) 支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。

【本文地址】

公司简介

联系我们

今日新闻

推荐新闻

专题文章