Palauttaa Double-arvon, joka määrittää mukautetun sisäisen korkokannan säännöllisille kassavirroille (maksuille ja saataville).
Syntaksi
MSISÄINEN(arvot (); finance_rate; reinvest_rate)
MSISÄINEN-funktion syntaksilla on seuraavat argumentit:
| Argumentti | Kuvaus |
|---|---|
| arvot () | Pakollinen. Double-tyyppiä oleva taulukko, joka määrittää kassavirta-arvot. Taulukon on sisällettävä vähintään yksi negatiivinen arvo (maksu) ja positiivinen arvo (saaminen). |
| finance_rate | Pakollinen. Maksetun koron määrittäminen rahoituskuluina. |
| reinvest_rate | Pakollinen. Kaksinkertainen korko, joka on määritetty uudelleensijoituksen tuotoille. |
Huomautuksia
Muokattu sisäinen korkokanta on sisäinen korkokanta, kun maksuja ja saatavia rahoitetaan eri koroilla. MSISÄINEN-funktiossa otetaan huomioon sekä investointikustannukset (finance_rate) että rahan uudelleensijoituksesta saatu korko (reinvest_rate).
finance_rate- ja reinvest_rate-argumentit ovat prosenttilukuja, jotka ilmaistaan desimaalilukuina. Esimerkiksi 12 prosenttia ilmaistaan lukuna 0,12.
MSISÄINEN-funktio tulkitsee maksujen ja saatavien järjestyksen käyttämällä taulukon arvojen järjestystä. Varmista, että kirjoitat maksujen ja saatavien arvot oikeassa järjestyksessä.
Esimerkki
Huomautus
Seuraavissa esimerkeissä kerrotaan, kuinka tätä funktiota käytetään Visual Basic for Applications (VBA) -moduulissa. Jos haluat lisätietoja VBA:n käytöstä, valitse Sovelluskehittäjän opasHaku-kentän viereisestä luettelosta ja anna yksi tai useampi hakuehto hakukenttään.
Tässä esimerkissä MSISÄINEN-funktion avulla palautetaan muokattu sisäinen korkokanta matriisiin Values()sisältyville kassavirroille.
LoanAPR Edustaa rahoituskorkoa ja InvAPR edustaa uudelleensijoituksen yhteydessä saatua korkoa.
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