Atgriež Double vērtību, kas norāda periodisko naudas plūsmu (maksājumu un ieņēmumu) iekšējo ieņēmumu likmi.
Sintakse
IRR( vērtības () [, minējums ] )
Funkcijas IRR sintaksē ir šādi argumenti:
Arguments |
Apraksts |
vērtības () |
Obligāts. Double masīvs, kas norāda naudas plūsmas vērtības. Masīvā jābūt iekļautai vismaz vienai negatīvai vērtībai (maksājums) un vienai pozitīvai vērtībai (ieņēmumi). |
minējums |
Neobligāts arguments. Variants, kas norāda jūsu novērtēto vērtību, tiks atgriezta IRR. Ja tas tiek izlaists, minējums ir 0,1 (10 procenti). |
Piebildes
Iekšējā atdeve ir procentu likme, kas saņemta no regulāriem intervāliem veiktiem maksājumiem un ieņēmumiem saņemtai investīcijai.
Funkcija IRR izmanto masīvā ietilpsto vērtību secību, lai interpretētu maksājumu un ieņēmumu secību. Noteikti ievadiet savu maksājumu un ieņēmumu vērtības pareizajā secībā. Nav jāfiksē katra perioda naudas plūsma, jo tā ir anuitātei.
IRR aprēķina ar iterāciju. Sākot ar minējumu vērtību,RR cikliski iziet cauri aprēķinam, līdz rezultāts ir precīzs līdz 0,00001 procentam. Ja IRR nevar atrast rezultātu pēc 20 mēģinājumiem, tas neizdodas.
Piemērs
Piezīme.: Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.
Šajā piemērā funkcija IRR atgriež iekšējo atdevi 5 masīvā iekļautās naudas plūsmas Values(). Pirmais masīva elements ir negatīva naudas plūsma, kas atspoguļo uzņēmējdarbības sākuma izmaksas. Atlikusīs 4 naudas plūsmas attēlo pozitīvās naudas plūsmas turpmākos 4 gadus. Guess ir paredzētā iekšējā atdeves norma.
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.