Trả về một giá trị kiểu Đúp xác định tỷ suất hoàn vốn nội bộ có điều chỉnh cho một chuỗi các dòng tiền định kỳ (thanh toán và biên nhận).
Cú pháp
MIRR( values (), finance_rate, reinvest_rate)
Cú pháp hàm MIRR có các đối số sau đây:
|
Đối số |
Mô tả |
|
values () |
Bắt buộc. Mảng Kép xác định các giá trị dòng tiền. Mảng phải chứa ít nhất một giá trị âm (một khoản thanh toán) và một giá trị dương (biên nhận). |
|
finance_rate |
Bắt buộc. Xác định kép lãi suất được trả như là chi phí tài chính. |
|
reinvest_rate |
Bắt buộc. Xác định kép lãi suất nhận được từ tái đầu tư tiền mặt. |
Chú thích
Tỷ suất hoàn vốn nội bộ có điều chỉnh là tỷ suất hoàn vốn nội bộ khi các khoản thanh toán và biên nhận được tính toán ở các mức khác nhau. Hàm MIRR tính đến cả chi phí của khoản đầu tư (finance_rate) và lãi suất nhận được khi tái đầu tư tiền mặt (reinvest_rate).
Tham đối finance_rate và reinvest_rate là tỷ lệ phần trăm được thể hiện dưới dạng giá trị thập phân. Ví dụ: 12 phần trăm được thể hiện là 0,12.
Hàm MIRR dùng thứ tự các giá trị trong mảng để diễn giải thứ tự thanh toán và biên nhận. Hãy đảm bảo bạn nhập các giá trị thanh toán và biên nhận theo đúng thứ tự.
Ví dụ
Lưu ý: Các ví dụ sau thể hiện cách sử dụng hàm này trong mô-đun Visual Basic for Applications (VBA). Để biết thêm thông tin về cách làm việc với VBA, chọn Tham khảo dành cho Nhà phát triển trong danh sách thả xuống cạnh Tìm kiếm, rồi nhập một hoặc nhiều từ vào hộp tìm kiếm.
Ví dụ này dùng hàm MIRR để trả về tỷ suất hoàn vốn nội bộ có điều chỉnh của một chuỗi dòng tiền trong mảng và Values(). LoanAPR tượng trưng cho lãi suất tài chính và InvAPR thể hiện lãi suất nhận được khi tái đầu tư.
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
