IPmt 函数

返回一个 Double 值, 指定基于定期定额支付和固定利率的年金在给定期间内的利息支付额。

语法

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

IPmt函数语法具有以下参数:

参数

描述

rate

必需。 指定每个期间的利率的double 。 例如, 如果您以 10% 的年百分比费率 (APR) 获得汽车贷款并按月支付, 则每期费率为 0.1/12, 即0.0083。

每天

必需。 Double类型, 指定从1到nper范围内的付款期。

nper

必需。 Double值, 指定年金付款总期数。 例如, 如果您按月支付四年的汽车贷款, 则贷款总有 4 * 12 (即 48) 支付期。

pv

必需。 Double值, 指定一系列未来付款或收入的现值 (即当前值)。 例如, 当您借钱购买车时, 贷款金额是您将支付的每月汽车支付的当前价值。

fv

可选。 变量, 指定完成最终付款后所需的未来值或现金余额。 例如, 贷款的未来值为 $0, 因为它是最终付款后的值。 但是, 如果您希望为孩子的教育版节省18年的 $50000, 则 $50000 是未来值。 如果省略, 则假定为0。

type

可选。 用于指定付款到期时间的Variant 。 如果付款期结束时付款到期, 则使用 0, 或者在期初付款到期时使用1。 如果省略, 则假定为0。


备注

年金是在一段时间内支付的一系列固定现金付款。 年金可以是一笔贷款 (如住房抵押贷款) 或一笔投资 (如按月储蓄计划)。

必须使用以相同单位表示的支付期计算费率nper参数。 例如, 如果rate使用月份计算, 则nper也必须使用月份计算。

对于所有参数, 支付的现金 (如储蓄金额) 用负数表示;收到的现金 (如股利支票) 用正数表示。

查询示例

表达式

结果

选择 FinancialSample、IPMT ([AnnualRate]/12, 10, [TermInYears] * 12,-[LoanAmount], 0, 0) 作为 INTPaid 从 FinancialSample;

返回表 "FinancialSample" 中的所有字段, 根据 "AnnualRate" 和 "TermInYears" 计算 "LoanAmount" 的 "每" (本示例中为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.

注意:  本页面是自动翻译的,可能包含语法错误或不准确之处。 我们的目的是使此内容能对你有所帮助。 能否告知我们此信息是否有所帮助? 下面是该参考内容的英文版

扩展你的 Office 技能
了解培训
抢先获得新功能
加入 Office 预览体验计划

此信息是否有帮助?

谢谢您的反馈!

谢谢你的反馈! 可能需要转接到 Office 支持专员。

×