Vraća dvostruki broj koji navodi izmenjenu internu stopu prinosa za niz periodičnih tokova novca (plaćanja i priznanice).
Sintaksa
MIRR( vrednosti (), finance_rate, reinvest_rate)
Sintaksa funkcije MIRR ima sledeće argumente:
Argument |
Opis |
values () |
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). |
finance_rate |
Obavezno. Double koji navodi kamatnu stopu koja se plaća kao troškovi finansiranja. |
reinvest_rate |
Obavezno. Double specifying interest rate received on gains from cash reinvestment. |
Napomene
Izmenjena interna kamatna stopa je interna kamatna stopa kada se rate i priznanice finansiraju različitim kamatnim stopama. Funkcija MIRR uzima u koštac investicije (finance_rate) i kamatnu stopu koja se dobija za ponovni ulaganje novca (reinvest_rate).
Argumenti finance_rate i reinvest_rate su procenti izraženi kao decimalne vrednosti. Na primer, 12 procenata se izražava kao 0,12.
Funkcija MIRR koristi redosled vrednosti u nizu za interpretiranje redosleda plaćanja i prihoda. Pazite da vrednosti plaćanja i prihoda unesete ispravnim redosledom.
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.
Ovaj primer koristi funkciju MIRR za vraćanje izmenjene interne stope prinosa za niz novčanih tokova sadržanih u nizu Values(). LoanAPR predstavlja finansijsku kamatu, a InvAPR predstavlja kamatnu stopu koja se dobija na ponovno investiranje.
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