Vraća vrednost Double, koja navodi internu kamatnu stopu za niz periodičnih tokova novca (plaćanja i prihodi).
Sintaksa
IRR(vrednosti () [, procena ] )
Sintaksa funkcije IRR ima sledeće argumente:
| Argument | Opis |
|---|---|
| Vrednosti () | Obavezno. Niz Double vrednosti koje navode vrednosti toka novca. Niz mora da sadrži najmanje jednu negativnu vrednost (plaćanje) i jednu pozitivnu vrednost (prihod). |
| guess | Opcionalno. Varijanta koja navodi vrednost koju procenjujete da će vratiti funkcija IRR. Ako je pretpostavka izostavljena, pretpostavljena vrednost je 0,1 (10 procenata). |
Napomene
Interna stopa prinosa je kamatna stopa koja se zaračunava za investicije kod kojih postoji isplata i prihod koji se javljaju u redovnim intervalima.
Funkcija IRR koristi redosled vrednosti u nizu kako bi interpretirala redosled plaćanja i prihoda. Pazite da vrednosti plaćanja i prihoda unesete ispravnim redosledom. Tok novca za svaki period ne mora da bude fiksiran, kao što je to za anuitet.
Vrednost IRR se izračunava iteracijom. IRR započinje sa pretpostavljenom vrednošću priliva sredstava i vrši izračunavanje sve dok ne dobije rezultat sa preciznošću od 0,00001 procenata. Ako funkcija IRR ne može da pronađe rezultat nakon 20 pokušaja, ona ne uspeva.
Primer
Napomena
Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.
U ovom primeru, funkcija IRR daje internu kamatnu stopu za niz od 5 tokova novca sadržanih u nizu Values(). Prvi element niza je negativni tok novca koji predstavlja troškove pokretanja poslovanja. Prepreostala 4 toka novca predstavljaju pozitivna toka novca za naredne 4 godine.
Guess je procenjena interna stopa prinosa.
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.