Vraća dvostruku vrijednost koja određuje internu stopu povrata za niz periodičnih novčanih tokova (uplata i računa).
Sintaksa
IRR( values () [, procjena ] )
Sintaksa funkcije IRR sadrži ove argumente:
|
Argument |
Opis |
|
vrijednosti () |
Obavezno. Polje Dvostruke vrijednosti novčanog toka. Polje mora sadržavati barem jednu negativnu vrijednost (uplatu) i jednu pozitivnu vrijednost (račun). |
|
procjena |
Neobavezno. Vrijednost koju odredite variant koju procjenjujete vratiti će IRR. Ako se izostavi, procjena je 0,1 (10 posto). |
Napomene
Interna stopa povrata je kamatna stopa primljena za ulaganje koje se sastoji od uplata i računa koji se odvijaju u pravilnim vremenskim razmacima.
Funkcija IRR koristi redoslijed vrijednosti unutar polja za tumačenje redoslijeda uplata i računa. Provjerite jeste li unijeli vrijednosti uplate i računa ispravnim redoslijedom. Protok novca za svako razdoblje ne mora se popraviti jer je za anuitet.
IRR se izračunava iteracijama. Počevši od vrijednosti procjena, IRR se kreće kroz izračun dok rezultat ne bude točan u rasponu od 0,00001 posto. Ako IRR ne može pronaći rezultat nakon 20 pokušaja, neće uspjeti.
Primjer
Napomena: Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.
U ovom primjeru funkcija IRR vraća internu stopu povrata za niz od 5 novčanih tokova sadržanih u polju Values(). Prvi element polja negativni je protok novca koji predstavlja poslovne troškove pokretanja. Preostala četiri novčana tokova predstavljaju pozitivne protoke novca za sljedeće četiri godine. Guess je procijenjena interna stopa povrata.
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.
