IPmt 函数

返回一个 Double，它基于定期固定付款和固定利率指定年金的给定期间利率付款。

语法

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

IPmt 函数具有以下命名参数：

Part	说明
率	必填。 指定每个周期的利率的 Double。 例如，如果您获得了年利率 (APR) 为 10% 的汽车贷款并进行月供，则每期利率为 0.1/12 或 0.0083。
每	必填。 指定介于 1 和 nper 之间的付款期次的 Double。
nper	必填。 指定年金总付款期数的“Double”。 例如，如果您要每月偿付四年期限的车贷，您的贷款总付款期为 4 * 12 （或 48）。
光伏	必填。 指定一系列未来付款或回执的现值或当前值的“Double” 。 例如，当你借钱买车时，贷款金额是贷款人每月支付汽车付款的现值。
抗体	可选。 指定在完成最后付款后所需的未来值或现金余额的 Variant。 例如，贷款的未来值为 $0，因为这是完成最后付款后的值。 但是，如果要在 18 年内节省 50，000 美元用于孩子的教育，则 50，000 美元是未来价值。 如果省略了，便假设为 0。
type	可选。 指定付款的到期时间的 Variant。 如果付款在付款期结束时到期，则使用 0；如果付款在付款期开始时到期，则使用 1。 如果省略，则假定为 0。

备注

年金是一段时间内一系列的固定的现金付款。 年金可以是贷款（如房产抵押），也可以是投资（如月存款计划）。

必须使用以相同单位表示的付款期来计算 rate 和 nper参数 。 例如，如果使用月份计算 费率 ，则还必须使用月份计算 nper 。

对于所有参数，已支出现金（例如，存款储蓄）用负数表示；已收现金（例如，股利支票）用正数表示。

示例

此示例使用 IPmt 函数计算在所有付款相等时的付款利息。 给定的是每期 (APR / 12) 的利率百分比， 需要利息部分的付款期 () Period 、 () TotPmts 的付款总数、贷款 () PVal 的现值或本金、贷款 (FVal) 的未来价值，以及指示付款期开始还是结束时到期 (PayType) 的数字。

Dim FVal, Fmt, PVal, APR, TotPmts, PayType, Period, IntPmt, TotInt, Msg
Const ENDPERIOD = 0, BEGINPERIOD = 1    ' When payments are made.
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 end of the month?", vbYesNo)
If PayType = vbNo Then PayType = BEGINPERIOD Else PayType = ENDPERIOD
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.

另请参阅

• 函数 (Visual Basic for Applications)

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。