Applies ToAccess untuk Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Mengembalikan Double yang menentukan tingkat pengembalian internal yang dimodifikasi untuk serangkaian aliran kas berkala (pembayaran dan tanda terima).

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. Ganda menentukan suku bunga yang dibayarkan sebagai biaya pembiayaan.

reinvest_rate

Diperlukan. Ganda menentukan suku bunga yang diterima pada keuntungan dari reinvestasi kas.

Keterangan

Tingkat pengembalian internal yang dimodifikasi adalah tingkat pengembalian internal ketika pembayaran dan penerimaan dibiayai dengan tarif yang berbeda. Fungsi MIRR memperhitungkan biaya investasi (finance_rate) dan suku bunga yang diterima pada reinvestasi kas (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 menginterpretasikan urutan pembayaran dan tanda terima. 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 serangkaian arus kas yang terdapat dalam array Values(). LoanAPR mewakili bunga pembiayaan, dan InvAPR mewakili suku bunga yang diterima pada reinvestasi.

Dim LoanAPR, InvAPR, Fmt, RetRate, MsgStatic 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) = 25000Values(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?

Ingin opsi lainnya?

Jelajahi manfaat langganan, telusuri kursus pelatihan, pelajari cara mengamankan perangkat Anda, dan banyak lagi.

Komunitas membantu Anda bertanya dan menjawab pertanyaan, memberikan umpan balik, dan mendengar dari para ahli yang memiliki pengetahuan yang luas.