Funkcija MIRR

Taikoma
„Access“, skirta „Microsoft 365“ „Access 2024“ Access 2021 Access 2019 Access 2016

Pateikia dvigubą skaičių, nurodantį periodinių pinigų srautų sekos (mokėjimų ir pajamų) modifikuotą vidinį grąžinimo koeficientą.

Sintaksė

MIRR(reikšmės(), finance_rate, reinvest_rate)

Funkcijos MIRR sintaksė turi tokius argumentus:

Argumentas Aprašymas
Reikšmės () Būtinas. Dvigubo skaičiaus masyvas nurodantis pinigų srauto vertes. Masyve turi būti bent viena neigiama vertė (mokėjimas) ir viena teigiama vertė (pajamos).
finance_rate Būtinas. Dvigubas nurodantis palūkanų normą, sumokėtą kaip finansavimo kainą.
reinvest_rate Būtinas. Dvigubas nurodo palūkanų normą, gautą iš grynųjų pinigų pakartotinio investavimo.

    

Pastabos

Modifikuota vidinė grąžos norma yra vidinė grąžos norma, kai mokėjimai ir pajamos finansuojami taikant skirtingus tarifus. Funkcija MIRR atsižvelgia ir į investicijų kainą (finance_rate), ir į palūkanų normą, gautą pakartotinai investavus pinigus (reinvest_rate).

Argumentai finance_rate ir reinvest_rate yra procentai, išreikšti dešimtainėmis reikšmėmis. Pvz., 12 procentų išreiškiama kaip 0,12.

Mokėjimų ir pajamų tvarkai nustatyti funkcija MIRR naudoja verčių išdėstymo tvarką masyve. Įsitikinkite, kad įvedėte mokėjimo ir pajamų laukų vertes teisinga eilės tvarka.

Pavyzdys

Pastaba

Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.

Šiame pavyzdyje naudojama funkcija MIRR , grąžinanti masyve esančių pinigų srautų sekos modifikuotą vidinę palūkanų normą Values(). LoanAPR Nurodo finansavimo palūkanas ir InvAPR palūkanų normą, gautą pakartotinai investuojant.

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