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, MsgStatic 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) = 25000Values(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
