Returnerar ett värde av datatypen Double som anger den modifierade internräntan för en serie periodiska betalningar (in- och utbetalningar).
Syntax
MIRR(värden (), finance_rate, reinvest_rate)
Syntaxen för funktionen MODIR har följande argument:
| Argument | Beskrivning |
|---|---|
| Värden () | Obligatoriskt. Matris med Double-värden där penningflödets värden anges. Matrisen måste innehålla minst ett negativt tal (en betalning) och ett positivt tal (en inbetalning). |
| finance_rate | Obligatoriskt. Double anger betald ränta som finansieringskostnad. |
| reinvest_rate | Obligatoriskt. Double anger erhållen ränta på vinster från återinvestering av kontanter. |
Kommentarer
Den modifierade internräntan är internräntan när in- och utbetalningar finansieras med olika räntesatser. Funktionen MODIR tar hänsyn till både investeringskostnaden (finance_rate) och erhållen ränta på återinvestering av kontanter (reinvest_rate).
Argumenten finance_rate och reinvest_rate är procentsatser uttryckta som decimalvärden. 12 procent uttrycks exempelvis som 0,12.
Funktionen MODIR använder ordningsföljden för värdena i matrisen för att tolka ordningsföljden för in- och utbetalningarna. Därför måste du vara noggrann när du anger matrisens olika värden.
Exempel
Obs
I exemplen nedan visar vi hur du använder den här funktionen i en Visual Basic for Applications-modul (VBA). Om du vill läsa mer om hur man använder VBA, kan du välja Info för utvecklare i listrutan bredvid Sök och sedan skriva en eller flera söktermer i sökrutan.
I det här exemplet används funktionen MODIR för att returnera den modifierade internräntan för en serie penningflöden som finns i matrisen Values().
LoanAPR representerar finansieringsräntan och InvAPR den ränta som erhålls vid återinvestering.
Dim LoanAPR, InvAPR, Fmt, RetRate, Msg
Static Values(5) As Double ' Set up array.
LoanAPR = .1 ' Loan rate.
InvAPR = .12 ' Reinvestment rate.
Fmt = "#0.00" ' Define money 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 = MIRR(Values(), LoanAPR, InvAPR)
Msg = "The modified internal rate of return " & _
"for these five cash flows is"
Msg = Msg & Format(Abs(RetRate) * 100, Fmt) & "%."
' Display internal return rate.
MsgBox Msg