ฟังก์ชัน Rate

นำไปใช้กับ
Access for Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

ส่งกลับ Double ที่ระบุอัตราดอกเบี้ยต่องวดสําหรับเงินรายปี

ไวยากรณ์

Rate(nper, pmt,pv [, fv ] [, type ] [, guess ] )

ไวยากรณ์ของฟังก์ชัน Rate มีอาร์กิวเมนต์ดังนี้:

อาร์กิวเมนต์ คำอธิบาย
nper จำเป็น การ ระบุจํานวนงวดทั้งหมดของการชําระเงินรายปี ตัวอย่างเช่น หากคุณชําระเงินรายเดือนของสินเชื่อรถยนต์ 4 ปี เงินกู้ของคุณมีระยะเวลาการชําระเงินทั้งหมด 4 * 12 (หรือ 48)
พีเอ็มที จำเป็น ระบุการชําระเงินที่จะทําในแต่ละงวดสองครั้ง Payments มักจะมีเงินต้นและดอกเบี้ยที่ไม่เปลี่ยนแปลงตลอดอายุการผ่อนชําระ
pv จำเป็น การระบุมูลค่าปัจจุบันหรือมูลค่าวันนี้ของชุดของการชําระเงินในอนาคตหรือใบเสร็จรับเงินสองครั้ง ตัวอย่างเช่น เมื่อคุณยืมเงินเพื่อซื้อรถ จํานวนเงินกู้คือมูลค่าปัจจุบันของผู้ให้กู้ของการชําระเงินรถยนต์รายเดือนที่คุณจะทํา
FV ไม่จำเป็น ตัวแปรที่ระบุมูลค่าในอนาคตหรือยอดเงินสดที่คุณต้องการหลังจากที่คุณทําการชําระเงินขั้นสุดท้าย ตัวอย่างเช่น มูลค่าในอนาคตของเงินกู้คือ $0 เนื่องจากเป็นมูลค่าหลังจากการชําระเงินขั้นสุดท้าย อย่างไรก็ตาม หากคุณต้องการออมเงิน 50,000 ดอลลาร์ในช่วง 18 ปีเพื่อการศึกษาของบุตรหลาน 50,000 ดอลลาร์คือมูลค่าในอนาคต ถ้าละไว้ จะถือว่าเป็นศูนย์
พิมพ์ ไม่จำเป็น ตัวแปรที่ระบุ ตัวเลขที่ระบุว่าครบกําหนดชําระเงิน ใช้ 0 ถ้าถึงกําหนดชําระเงินตอนสิ้นสุดระยะเวลาการชําระเงิน หรือใช้ 1 ถ้าครบกําหนดชําระเงินตอนต้นงวด ถ้าละไว้ จะถือว่าเป็นศูนย์
guess ไม่จำเป็น ตัวแปรที่ระบุค่าที่คุณประเมินจะถูกส่งกลับตามอัตรา ถ้าไม่ใส่ค่าไว้ guess จะเป็น 0.1 (10 เปอร์เซ็นต์)

ข้อสังเกต

เงินรายปีคือชุดของการชําระเงินสดคงที่ที่เกิดขึ้นในช่วงเวลาหนึ่ง เงินรายปีอาจเป็นเงินกู้ (เช่น การจํานองบ้าน) หรือการลงทุน (เช่น แผนการออมรายเดือน)

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

อัตราจะ คํานวณโดยการทําซ้ํา เริ่มจากค่าของการ คาดเดาRate จะ วนผ่านการคํานวณจนกว่าผลลัพธ์จะถูกต้องภายใน 0.00001 เปอร์เซ็นต์ ถ้า Rate ไม่สามารถหาผลลัพธ์ได้หลังจากการคํานวณ 20 ครั้ง แสดงว่าไม่สามารถหาผลลัพธ์ได้ ถ้าค่า guess ของคุณคือ 10 เปอร์เซ็นต์ และ Rate ล้มเหลว ให้ลองใช้ค่าอื่นสําหรับ guess

ตัวอย่างคิวรี

นิพจน์ ผลลัพธ์
SELECT FinancialSample.*, (Rate([TermInYears]*12,-[MonthlyRePayment],[LoanAmount],0,0,0.1)*12) AS InterestRate FROM FinancialSample; ส่งกลับเขตข้อมูลทั้งหมดจากตาราง "FinancialSample" และ "อัตรา" ดอกเบี้ยรายปีโดยยึดตาม "TermInYears", "MonthlyRePayment" และ "LoanAmount" แล้วแสดงผลลัพธ์ในคอลัมน์ อัตราดอกเบี้ย

ตัวอย่าง VBA

หมายเหตุ

ตัวอย่างต่อไปนี้จะสาธิตการใช้ฟังก์ชันนี้ในโมดูล Visual Basic for Applications (VBA) สําหรับข้อมูลเพิ่มเติมเกี่ยวกับการทํางานกับ VBA ให้เลือก การอ้างอิงนักพัฒนาในรายการ ดรอปดาวน์ที่อยู่ถัดจาก ค้นหา แล้วใส่คําอย่างน้อยหนึ่งคําในกล่องค้นหา

ตัวอย่างนี้ใช้ฟังก์ชัน Rate เพื่อคํานวณอัตราดอกเบี้ยของเงินกู้ โดยกําหนดจํานวนงวดทั้งหมดของการชําระเงิน (),TotPmts จํานวนเงินกู้ที่ชําระ (),Payment มูลค่าปัจจุบันหรือเงินต้นของเงินกู้ (),PVal มูลค่าในอนาคตของเงินกู้ (),FVal ตัวเลขที่ระบุว่าครบกําหนดชําระเงินเมื่อจุดเริ่มต้นหรือสิ้นสุดรอบระยะเวลาการชําระเงิน ()PayType และค่าประมาณของอัตราดอกเบี้ยที่คาดไว้ ()Guess

Dim Fmt, FVal, Guess, PVal
Dim Payment, TotPmts, PayType, APR
' When payments are made.
Const ENDPERIOD = 0, BEGINPERIOD = 1    
Fmt = "##0.00"    ' Define percentage format.
FVal = 0    ' Usually 0 for a loan.
Guess = .1    ' Guess of 10 percent.
PVal = InputBox("How much did you borrow?")
Payment = InputBox("What's your monthly payment?")
TotPmts = InputBox("How many monthly payments do " & _
          "you have to make?")
PayType = MsgBox("Do you make payments at the end " & _
          "of the month?", vbYesNo)
If PayType = vbNo Then 
    PayType = BEGINPERIOD 
    Else PayType = ENDPERIOD
End If
APR = (Rate(TotPmts, -Payment, PVal, _
      FVal, PayType, Guess) * 12) * 100
MsgBox "Your interest rate is " & _
    Format(CInt(APR), Fmt) & " percent."