Pateikia dvigubą skaičių, nurodantį periodinių pinigų srautų sekos (mokėjimų ir pajamų) vidinę palūkanų normą.
Sintaksė
IRR(reikšmės () [, spėjimas ] )
Funkcijos IRR 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). |
| spėjimas | Pasirinktinis. Variantą, nurodantį jūsų apskaičiuotą reikšmę, grąžins IRR. Jei spėjama reikšmė nenurodyta, ji yra 0,1 (10 procentų). |
Pastabos
Vidinė grąžos norma yra palūkanų norma, gauta už investiciją, sudarytą iš įmokų ir pajamų, kurios gaunamos reguliariais intervalais.
Mokėjimų ir pajamų tvarkai nustatyti funkcija IRR naudoja verčių išdėstymo tvarką masyve. Įsitikinkite, kad įvedėte mokėjimo ir pajamų laukų vertes teisinga eilės tvarka. Kiekvieno laikotarpio pinigų srautas neprivalo būti fiksuotas, kaip anuiteto atveju.
IRR apskaičiuojama iteracijos būdu. Pradėjusi nuo spėjimo reikšmės, IRR tol kartoja skaičiavimus, kol rezultato tikslumas yra 0,00001 procento. Jei po 20 bandymų IRR neranda rezultato, programa nepavyksta.
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 funkcija IRR grąžina vidinę 5 masyve esančių grynųjų pinigų srautų sekos grąžinimo normą Values(). Pirmasis masyvo elementas yra neigiamas pinigų srautas, atspindintis verslo pradžios išlaidas. Likę 4 pinigų srautai yra teigiami ateinančių 4 metų pinigų srautai.
Guess Apskaičiuota vidinė grąžos norma.
Dim Guess, Fmt, RetRate, Msg
Static Values(5) As Double ' Set up array.
Guess = .1 ' Guess starts at 10 percent.
Fmt = "#0.00" ' Define percentage 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 = IRR(Values(), Guess) * 100
Msg = "The internal rate of return for these " & _
"five cash flows is "
Msg = Msg & Format(RetRate, Fmt) & " percent."
MsgBox Msg ' Display internal return rate.