Online Reference

Home

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

PV Function

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

ไวยากรณ์

PV(rate,nper,pv[,fv[,type]] )

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

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

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

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

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

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

ดูเพิ่มเติม

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

ตัวอย่าง

ตัวอย่างการใช้ฟังก์ชัน PV ในการส่งออกค่าของมูลค่าปัจจุบันของการออม ฿1,000,000 โดยแบ่งฝากเป็นปีละ ฿50,000 ตลอดระยะ 20 ปี ให้อัตราดอกเบี้ยต่อปี (APR), จำนวนงวดการจ่ายทั้งหมด (TotPmts), จำนวนการของแต่ละงวด (YrIncome), มูลค่าในอนาคต (FVal), และตัวเลขที่ระบุกำหนดการจ่าย (PayType) ซึ่ง YrIncome เป็นค่าลบเพราะเป็นการแสดงการจ่ายเงินออกเพื่อนำไปฝากเป็นเงินออม

Dim Fmt, APR, TotPmts, YrIncome, FVal, PayType, PVal
' เมื่อมีการจ่าย
Const ENDPERIOD = 0, BEGINPERIOD = 1

' กำหนดรูปแบบการเงิน
Fmt = "###,##0.00"
' อัตราดอกเบี้ยรายปี
APR = .0825
' จำนวนงวดทั้งหมด
TotPmts = 20
' เงินฝากรายปี
YrIncome = 50000
' มูลค่าในอนาคต
FVal = 1000000
' การจ่ายที่ต้นงวด
PayType = BEGINPERIOD
PVal = PV(APR, TotPmts, -YrIncome, FVal, PayType)

MsgBox "The present value is " & Format(PVal, Fmt) & "."