Vrátí hodnotu typu Double určující upravenou vnitřní výnosnost pro řadu pravidelných peněžních toků (plateb a příjmů).

Syntaxe

MIRR( values (); finance_rate, reinvest_rate)

Syntaxe funkce MIRR má tyto argumenty:

Argument

Popis

hodnoty ()

Povinný argument. Matice hodnot Double určující hodnoty peněžních toků. Matice musí obsahovat aspoň jednu zápornou hodnotu (platba) a jednu kladnou hodnotu (příjem).

finance_rate

Povinný argument. Double určující úrokovou sazbu zaplacenou jako náklady na financování.

reinvest_rate

Povinný argument. Double určující úrokovou sazbu získanou ze zisků z reinvestice v hotovosti.

Poznámky

Upravená vnitřní míra výnosnosti je vnitřní míra výnosnosti, pokud jsou platby a příjmy financovány různými sazbami. Funkce MIRR bere v úvahu náklady na investici (finance_rate) i úrokovou sazbu získanou při reinvestici hotovosti (reinvest_rate).

Argumenty finance_rate a reinvest_rate jsou procenta vyjádřená jako desetinné hodnoty. Například 12 procent je vyjádřeno jako 0,12.

Funkce MIRR používá pořadí hodnot v rámci pole k interpretaci pořadí plateb a příjmů. Platby a příjmy je nutné zadat ve správném pořadí.

Příklad

Poznámka: Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.

Tento příklad používá funkci MIRR k vrácení upravené vnitřní výnosnosti pro řadu peněžních toků obsažených v matici Values(). LoanAPR představuje úrok z financování a InvAPR představuje úrokovou sazbu získanou při reinvestici.

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

Potřebujete další pomoc?

Chcete další možnosti?

Prozkoumejte výhody předplatného, projděte si školicí kurzy, zjistěte, jak zabezpečit své zařízení a mnohem více.

Komunity vám pomohou klást otázky a odpovídat na ně, poskytovat zpětnou vazbu a vyslechnout odborníky s bohatými znalostmi.