Tagastab perioodiliste rahavoogude (maksed ja sissetulekud) sarja sisemist tasuvusmäära tähistava topelttäpsusega arvu.

Süntaks

IRR( väärtused () [, hinnang ] )

Funktsiooni IRR süntaksil on järgmised argumendid.

Argument

Kirjeldus

väärtused ()

Nõutav. Rahavooväärtusi täpsustava kahekordse massiiv. Massiivis peab sisalduma vähemalt üks negatiivne väärtus (makse) ja üks positiivne väärtus (sissetulek).

hinnang

Valikuline. Funktsiooni IRR tagastatavat hinnangulist väärtust tähistav Variant. Kui see ära jäetakse, on hinnangu väärtus 0,1 (10 protsenti).

Kommentaarid

Sisemine tasuvusmäär on regulaarsetelt maksetelt ja sissetulekutelt saadav intressimäär.

Funktsioon IRR kasutab maksete ja sissetulekute järjestuse tõlgendamiseks väärtuste järjestust massiivis. Sisestage maksete ja sissetulekute väärtused kindlasti õiges järjestuses. Erinevalt annuiteedist ei pea iga perioodi rahavoog olema fikseeritud.

IRR arvutatakse iteratsioonimeetodil. IRR alustab väärtusest hinnang ning arvutab, kuni on saavutatud 0,00001 protsendise täpsusega tulemus. Kui IRR pärast 20 katset tulemit ei leia, siis see nurjub.

Näide

Märkus.: Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.

Selles näites tagastab funktsioon IRR massiivis Values() sisalduva 5 rahavoo sisemise tasuvusmäära. Esimene massiivielement on ettevõtte alustamiskulusid tähistav negatiivne rahavoog. Ülejäänud neli rahavoogu tähistavad järgneva nelja aasta positiivseid rahavooge. Guess on hinnanguline sisemine tasuvusmäär.

Dim Guess, Fmt, RetRate, MsgStatic 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) = 25000Values(3) = 28000 : Values(4) = 31000' Calculate internal rate.RetRate = IRR(Values(), Guess) * 100Msg = "The internal rate of return for these " & _      "five cash flows is "Msg = Msg & Format(RetRate, Fmt) & " percent."MsgBox Msg    ' Display internal return rate.

Kas vajate veel abi?

Kas soovite rohkem valikuvariante?

Siin saate tutvuda tellimusega kaasnevate eelistega, sirvida koolituskursusi, õppida seadet kaitsma ja teha veel palju muud.

Kogukonnad aitavad teil küsimusi esitada ja neile vastuseid saada, anda tagasisidet ja saada nõu rikkalike teadmistega asjatundjatelt.