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.
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。