Palauttaa Double-arvon, joka määrittää muokatun sisäisen korkokantan sarjalle säännöllisiä kassavirtoja (maksuja ja saamisia).
Syntaksi
MSII( arvot (), finance_rate, reinvest_rate)
MSII-funktion syntaksissa 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. Kaksinkertainen korko, joka on maksettu rahoituskustannustena. |
reinvest_rate |
Pakollinen. Double specifying interest rate received on gains from cash reinvestment. |
Huomautuksia
Muokattu sisäinen korkokanta on sisäinen korkokanta, kun maksuista ja saamista rahoitus tapahtuu eri maksuilla. MSIJ-funktio ottaa huomioon sekä sijoituksen kustannukset (finance_rate) että kassavirran uudelleeninvestoinnista saadunkorkoprosenttin( reinvest_rate ).
Argumentit finance_rateja reinvest_rate ovat desimaaliarvoina ilmaistuja prosentteja. Esimerkiksi 12 prosenttia ilmaistaan 0,12.
MSIMIST-funktio tulkitsee maksu- ja saamisjärjestyksen matriisin arvojen järjestyksen perusteella. 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ä MSIMIST-funktiota käytetään muokatun sisäisen korkokantan palauttamiseen matriisi- ja Values(). LoanAPR edustaa rahoitusomistajaa, InvAPR vastaa uudelleeninvestoinnin aikana 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