Fungsi MIRR

Mengembalikan ganda yang menentukan tingkat pengembalian internal yang dimodifikasi untuk rangkaian aliran kas berkala (pembayaran dan penerimaan).

Sintaks

Mirr ( Values (), finance_rate, reinvest_rate)

Sintaks fungsi Mirr memiliki argumen ini:

Argumen

Deskripsi

values ()

Diperlukan. Array Ganda menentukan nilai arus kas. Array harus berisi setidaknya satu nilai negatif (pembayaran) dan satu nilai positif (penerimaan).

finance_rate

Diperlukan. Menggandakan nilai suku bunga yang dibayarkan sebagai biaya pembiayaan.

reinvest_rate

Diperlukan. Menggandakan nilai suku bunga yang diterima pada keuntungan dari reinvestasi tunai.


Keterangan

Tingkat pengembalian internal yang dimodifikasi adalah tingkat pengembalian internal ketika pembayaran dan penerimaan dibiayai dengan tarif berbeda. Fungsi Mirr memperhitungkan biaya investasi (finance_rate) dan suku bunga yang diterima pada reinvestment Cash (reinvest_rate).

Argumen finance_rate dan reinvest_rate adalah persentase yang dinyatakan sebagai nilai desimal. Misalnya, 12 persen dinyatakan sebagai 0,12.

Fungsi Mirr menggunakan urutan nilai dalam array untuk menafsirkan urutan pembayaran dan penerimaan. Pastikan memasukkan nilai pembayaran dan penerimaan dalam urutan yang tepat.

Contoh

Catatan: Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.

Contoh ini menggunakan fungsi Mirr untuk mengembalikan tingkat pengembalian internal yang dimodifikasi untuk rangkaian aliran kas yang terdapat dalam Values()array. LoanAPR mewakili bunga pembiayaan, dan InvAPR mewakili suku bunga yang diterima pada investasi ulang.

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

Perlu bantuan lainnya?

Kembangkan keterampilan Office Anda
Jelajahi pelatihan
Dapatkan fitur baru terlebih dahulu
Gabung ke Office Insiders

Apakah informasi ini bermanfaat?

Terima kasih atas umpan balik Anda!

Terima kasih atas umpan balik Anda! Sepertinya menghubungkan Anda ke salah satu agen dukungan Office kami akan sangat membantu.

×