IRR Function [VBA]

Calculates the internal rate of return for an investment.

警告图标

该功能或常量可通过以下语句启用:Option VBASupport 1,该语句需要放置在模块的每个可执行程序代码的前面。


语法:

IRR(Values() as Double , [Guess as Variant])

返回值:

Double

参数:

Values(): The array of values of the cash-flow. The values represent cash flow values at regular intervals, at least one value must be negative (payments), and at least one value must be positive (income).

Guess An initial estimate at what the IRR will be.

错误代码:

5 无效的过程调用

示例:

REM ***** BASIC *****

Option VBASupport 1

Sub ExampleIRR

 Dim cashFlow(0 to 3) As Double

 cashFlow(0) = -10000

 cashFlow(1) = 3500

 cashFlow(2) = 7600

 cashFlow(3) = 1000

 irrValue = IRR(cashFlow) * 100

 Print irrValue ' returns 11.3321028236252 . The internal rate of return of the cash flow.

End Sub