Online Reference

Home

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

VBA  Financial Function  ดาวน์โหลดคู่มือ

FV Function

VBA Function, ส่งออกค่าเป็นประเภทข้อมูล Double ของมูลค่าในอนาคต โดยมีงวดการจ่ายสม่ำเสมอ การจ่ายคงที่ และอัตราดอกเบี้ยคงที่

ไวยากรณ์

FV(rate, nper, pmt [,pv [,type]] )

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

ส่วน รายละเอียด
rate บังคับ, เป็นประเภทข้อมูล Double, ระบุอัตราดอกเบี้ยต่องวด เช่น การกู้เงินซื้อรถยนต์ที่อัตราดอกเบี้ย 10% ต่อปี และงวดการจ่ายเป็นรายเดือน อัตราดอกเบี้ยต่อเดือน คือ 0.1/12 หรือ 0.0083
nper บังคับ, เป็นประเภทข้อมูล Integer, ระบุจำนวนงวดการจ่ายทั้งหมด เช่น การจ่ายเงินกู้รายเดือนของเงินกู้ 4 ปี จำนวนงวดทั้งหมด คือ 4 * 12 (หรือ 48) งวดการจ่าย
pmt บังคับ, เป็นประเภทข้อมูล Double, ระบุจำนวนเงินจ่ายในแต่ละงวด การจ่ายปกติรวมเงินต้นและดอกเบี้ย ซึ่งไม่สามารถเปลี่ยนได้ตลอดอายุการใช้งาน
pv ไม่บังคับ, เป็นประเภทข้อมูล Variant, มูลค่าปัจจุบัน (หรือเงินรวมทั้งหมด) ของชุดการจ่ายสำหรับมูลค่าอนาคต เช่น การยืมเงินเพื่อซื้อรถยนต์ เงินกู้ คือ มูลค่าปัจจุบันที่ผู้กู้ต้องจ่ายเป็นรายเดือน ถ้าไม่กำหนด จะใช้ค่าเป็น 0
type ไม่บังคับ, เป็นประเภทข้อมูล Variant, ระบุกำหนดการจ่าย ใช้ 0 ถ้ากำหนดชำระเป็นสิ้นงวด หรือ 1 ถ้ากำหนดชำระเป็นต้นงวด ถ้าไม่กำหนด จะใช้ค่าเป็น 0

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

งวดการจ่ายเป็นชุดการจ่ายที่คงที่ตลอดระยะเวลาทั้งหมด การจ่ายสามารถเป็นการชำระเงินกู้ ( เช่น ค่างวดเงินกู้ซ้อบ้าน) หรือการลงทุน ( เช่น การฝากเงินออมเป็นรายเดือน)

อากิวเมนต์ rate และ nper ต้องมีหน่วยเป็นหน่วยเดียวกัน เช่น rate คำนวณเป็นอัตราต่อเดือน nper จะต้องเป็นรายเดือนด้วย

อากิวเมนต์ทั้งหมด เงินสดจ่ายออก ( เช่น การฝากเงินออม) ให้เป็นค่าลบ เงินสดรับเข้า ( เช่น เงินปันผล) ให้เป็นบวก

ดูเพิ่มเติม

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

ตัวอย่าง

ตัวอย่างการใช้ฟังก์ชัน FV ในการส่งออกค่ามูลค่าในอนาคตของการลงทุนด้วยอัตราดอกเบี้ยต่อปี ซึ่งกำหนดเป็นงวด (APR / 12), จำนวนงวดการจ่ายทั้งหมด (TotPmts), การจ่าย (Payment), มูลค่าปัจจุบันของการลงทุน (PVal), และตัวเลขที่ระบุกำหนดการจ่าย (PayType) เนื่องจากเป็นการจ่ายชำระ จึงมีค่าเป็นลบ

Dim Fmt, Payment, APR, TotPmts, PayType, PVal, FVal
' กำหนดประเภทการจ่าย
Const ENDPERIOD = 0, BEGINPERIOD = 1

' กำหนดรูปแบบการเงิน
Fmt = "###,###,##0.00"
Payment = InputBox("How much do you plan to save each month?")
APR = InputBox("Enter the expected interest annual percentage rate.")

' ตรวจความถูกต้องของค่า
If APR > 1 Then APR = APR / 100

TotPmts = InputBox("For how many months do you expect to save?")
PayType = MsgBox("Do you make payments at the end of month?", vbYesNo)

If PayType = vbNo Then PayType = BEGINPERIOD Else PayType = ENDPERIOD

PVal = InputBox("How much is in this savings account now?")
FVal = FV(APR / 12, TotPmts, -Payment, -PVal, PayType)
MsgBox "Your savings will be worth " & Format(FVal, Fmt) & "."