Returnerer en dobbelt, der angiver den modificerede interne rente for en række periodiske pengestrømme (betalinger og kvitteringer).
Syntaks
MIA( værdier (), finance_rate, reinvest_rate)
Syntaksen for funktionen MIA har disse argumenter:
|
Argument |
Beskrivelse |
|
værdier () |
Påkrævet. Matrix med Dobbelt reelt tal, der angiver pengestrømsværdier. Matrixen skal indeholde mindst én negativ værdi (en betaling) og én positiv værdi (en indgående betaling). |
|
Finansrente |
Påkrævet. Dobbelt reelt tal angiver den betalte rente som finansieringsomkostninger. |
|
Geninvesteringsrente |
Påkrævet. Dobbelt reelt tal angiver renten på gevinster fra kontantinvestering. |
Bemærkninger
Den modificerede interne forrentning er den interne forrentning, når betalinger og indtægter finansieres til forskellige satser. Funktionen MIA tager hensyn til både investeringsomkostningerne (finance_rate) og den rente, der modtages ved geninvestering af kontanter (reinvest_rate).
Argumenterne finance_rate og reinvest_rate er procenter udtrykt som decimalværdier. 12 % udtrykkes f.eks. som 0,12.
Funktionen MIA anvender rækkefølgen af værdier i matrixen til at fortolke rækkefølgen af udgående og indgående betalinger. Sørg for at angive værdierne for udgående og indgående betalinger i den rigtige rækkefølge.
Eksempel
Bemærk!: Følgende eksempler demonstrerer brugen af denne funktion i et VBA-modul (Visual Basic for Applications). Hvis du vil have mere at vide om at arbejde med VBA, skal du vælge Udviklerreference på rullelisten ud for Søg og skrive ét eller flere ord i søgefeltet.
I dette eksempel bruges funktionen MIA til at returnere den modificerede interne rente for en række pengestrømme, der er indeholdt i matrixen Values(). LoanAPR repræsenterer finansieringsrenten, og InvAPR repræsenterer den rente, der modtages ved geninvestering.
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
