用于分组循环CF的Excel中的净现值

以下是60个期间的现金stream量表。

有一套经常性的现金stream量。 在excel中有一个简单的方法来计算所有60个周期（每月现金stream量）的NPV，而不必创build一个60行的表格并使用NPV公式？

所以60行项目的公式会是这样的：

=NPV(PERIODIC RATE, VALUES OF CF 1 - 60) + CF0

但是，如果你知道在Excel中有经常性的现金stream量，而不需要枚举所有的60行，你可以快捷吗？

提前致谢。

Answer 1

没有内置函数可以做到这一点，但我们可以build立自己的。 这是一个UDF（用户定义函数）：

 Function myNPV(rate As Double, vl As Range, times As Range) If vl.Cells.Count <> times.Cells.Count Then Exit Function Dim vlArr() As Variant Dim timesArr() As Variant Dim ovlArr() As Double Dim i&, j&, t&, cnt& vlArr = vl.Value timesArr = times.Value For i = LBound(vlArr, 1) To UBound(vlArr, 1) If vlArr(i, 1) <> "" Then t = t + timesArr(i, 1) End If Next i cnt = 1 ReDim ovlArr(1 To t) For i = LBound(vlArr, 1) To UBound(vlArr, 1) If vlArr(i, 1) <> "" Then For j = 1 To timesArr(i, 1) ovlArr(cnt) = vlArr(i, 1) cnt = cnt + 1 Next j End If Next i myNPV = Application.WorksheetFunction.NPV(rate, ovlArr) End Function 

在工作簿中按Alt-F11。 这将打开VBE。

转到插入并插入一个模块。 这将打开一个新的模块。 复制并粘贴上面的代码。

你可以把它叫做任何其他的公式：

 =myNPV(C20/C19,B3:B17,C3:C17)+B2 

这有三个标准：费率，金额范围和相应的次数。

Answer 2

您可以使用年金公式

在D1使用=1/($B$7/12)*(1-1/(1+$B$7/12)^C1)*B1*1/(1+$B$7/12)^(SUM($C$1:C1)-12)并抄下来