會以定期、固定付款和固定利率為基礎,以 Double 指定年金的指定期間之利息付款。

語法

IPmt ( rate, per, nper pv[, fv ][, type])

IPmt 函數語法具有以下引數:

引數

描述

rate

必要。 Double 指定每期利率。 例如,如果您的汽車貸款的年利率 (APR) 是10%,並且每月付款,則每期的利率為 0.1/12 或 0.0083。

必要。 1 到 nper 範圍內指定付款週期的 倍數

nper

必要。 年金中指定總付款期數的倍數。 舉例來說,如果您按月償還為期四年的汽車貸款,那麼貸款總付款期數會是 4 * 12 (或 48)。

光伏

必要。 指定未來一系列付款或收入之現值或現值的雙倍指定。 例如,當您貸款購買汽車時,貸款金額就是每月汽車付款金額的現值。

fv

可省略。 用來指定您在最後一次付款後所要的終值或現金餘額的 Variant。 例如,貸款的終值是 $0,因為這是其最終付款的值。 不過,如果您想要為您的子女儲蓄 $50,000 教育基金 (18 年),則 $50,000 是終值。 如果沒有指定,會假設為 0。

type

可省略。 用來指定給付時點的 Variant。 如果給付時點為付款期限結束時,則使用 0;如果給付時點為期限開始時,則使用 1。 如果沒有指定,會假設為 0。

註解

年金是指一段時間內,一系列的固定現金付款活動。 年金可能是一筆貸款 (例如房屋貸款) 或投資 (例如每月存款計劃)。

必須使用相同單位表示的付款期間來計算 ratenper 引數。 例如,如果 rate 是使用月份計算,則 nper 也必須使用月份計算。

對於所有引數,付出的現金 (例如要儲蓄的存款金額) 是由負數表示;收入的現金 (例如股利支票) 是由正數表示。

查詢範例

運算式

結果

SELECT FinancialSample.*, IPMT ([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample;

從 "FinancialSample" 資料表返回所有欄位,在此範例) 中,根據 "AnnualRate" 和 "TermInYears" 計算 "per" (10 中支付的利息,並顯示 INTPaid 欄中的結果。

VBA 範例

附註: 下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊,請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考],並在 [搜尋] 方塊中輸入一個或多個字詞。

此範例使用 IPmt 函數來計算當所有付款均等值時,付款的利息金額。 指定為每期的利率百分比 (APR / 12) 、需要支付利息部分的付款期間 (Period) 、付款總數 (TotPmts) 、貸款 (PVal) 的現值或本金、貸款 (FVal) 的未來值,以及指出付款期限 (PayType) 開始或結束時的付款數位。

Dim FVal, Fmt, PVal, APR, TotPmts, PayType
Dim Period, IntPmt, TotInt, Msg
Const ENDPERIOD = 0, BEGINPERIOD = 1
FVal = 0 ' Usually 0 for a loan.
Fmt = "###,###,##0.00" ' Define money format.
PVal = InputBox("How much do you want to borrow?")
APR = InputBox("What is the annual percentage rate " & _
"of your loan?")
If APR > 1 Then APR = APR / 100 ' Ensure proper form.
TotPmts = InputBox("How many monthly payments?")
PayType = MsgBox("Do you make payments at " & _
"the end of the month?", vbYesNo)
If PayType = vbNo Then
PayType = BEGINPERIOD
Else PayType = ENDPERIOD
End If
For Period = 1 To TotPmts ' Total all interest.
IntPmt = IPmt(APR / 12, Period, TotPmts, _
-PVal, FVal, PayType)
TotInt = TotInt + IntPmt
Next Period
Msg = "You'll pay a total of " & Format(TotInt, Fmt)
Msg = Msg & " in interest for this loan."
MsgBox Msg ' Display results.

Need more help?

Expand your skills
Explore Training
Get new features first
Join Microsoft Office Insiders

Was this information helpful?

How satisfied are you with the translation quality?
What affected your experience?

Thank you for your feedback!

×