Online Reference

Home

Microsoft Reference
Knowledge Developer Database Internet Resource Forum
VBA
Financial Function
ดาวน์โหลดคู่มือ

IRR Function

VBA Function, ส่งออกค่าเป็นประเภทข้อมูล Double ของอัตราผลตอบแทนภายใน (Internal rate of return) ของกระแสเงินสด (รายจ่ายและรายรับ)

ไวยากรณ์

IRR(value() [,guess] )

อากิวเมนต์ของฟังก์ชัน IRR มีความหมาย คือ

ส่วน รายละเอียด
value บังคับ, เป็น array ของประเภทข้อมูล Double, ระบุมูลค่าของกระแสเงิน โดย array ต้องเก็บค่าอย่างน้อยเป็นค่าลบ 1 ค่า (รายจ่าย) และค่าบวก 1 ค่า (รายรับ)
guess ไม่บังคับ, เป็นประเภทข้อมูล Variant, ระบุค่าในการประมาณค่าส่งออกของฟังก์ชัน IRR ถ้าไม่กำหนด จะให้ค่า guess เป็น 0.1 (10%)

ลักษณะการประยุกต์

อัตราผลตอบแทนภายใน (Internal rate of return) เป็นอัตราดอกเบี้ยรับสำหรับการลงทุนที่ประกอบด้วยรายจ่ายและรายรับ ที่เกิดขึ้นภายในโครงการ

ฟังก์ชัน IRR ใช้ลำดับของ value ภายใน array ในการแปรความหมายลำดับของรายจ่ายและรายรับ ดังนั้นจึงต้องมั่นใจว่ารายจ่ายและรายรับอยู่ในลำดับที่ถูกต้อง กระแสเงินสดสำหรับแต่ละงวดไม่จำเป็นต้องคงที่

ฟังก์ชัน IRR จำคำนวณแบบซ้ำ (iteration) โดยเริ่มจากค่าของ guess โดยฟังก์ชัน IRR จะคำนวณจนกระทั่งได้ค่าแม่นยำภายใน 0.00001% ถ้าฟังก์ชัน IRR ไม่สามารถหาได้ภายใน 20 รอบ จะไม่สามารถหาคำตอบได้

ดูเพิ่มเติม

ฟังก์ชัน DDB, ฟังก์ชัน IPMT, ฟังก์ชัน MIRR, ฟังก์ชัน NPer, ฟังก์ชัน NPV, ฟังก์ชัน Pmt, ฟังก์ชัน PPmt, ฟังก์ชัน PV, ฟังก์ชัน Rate, ฟังก์ชัน SLN, ฟังก์ชัน SYD

ตัวอย่าง

ตัวอย่างการใช้ฟังก์ชัน IRR ในการส่งออกค่าอัตราผลตอบแทนภายในสำหรับกระแสเงินสด 5 งวดที่เก็บใน array ชื่อ Values() โดยสมาชิกแรกของ array เป็นค่าลบเพื่อการใช้จ่ายในจัดตั้งธุรกิจ กระแสเงินสดที่เหลืออีก 4 งวดเป็นค่าบวกเพื่อแสดงกระแสเงินใน 4 ปี guess นำมาใช้ในการประมาณค่า IRR

Dim Guess, Fmt, RetRate, Msg

' กำหนด array.
Static Values(5) As Double
' guess เริมต้นที่ 10%
Guess = .1
' กำหนดรูปแบบการเงิน
Fmt = "#0.00"
' ค่าใช้จ่ายในจัดตั้งธุรกิจ
Values(0) = -70000

' กระแสเงินสดเป็นบวกแสดงรายรับ 4 ปีในการทำธุรกิจ
Values(1) = 22000 : Values(2) = 25000
Values(3) = 28000 : Values(4) = 31000
' การคำนวณ IRR
RetRate = IRR(Values(), Guess) * 100
Msg = "The internal rate of return for these five cash flows is "
Msg = Msg & Format(RetRate, Fmt) & " percent."
' แสดงค่า IRR
MsgBox Msg