雪风舰长:IPmt 函数 (财务函数)

来源:百度文库 编辑:九乡新闻网 时间:2024/04/29 20:52:28

IPmt 函数

返回 Double (Double 数据类型:一种基本数据类型,存储双精度浮点数。它存储 64 位数,范围大约介于 -1.797E308 到 -4.940E-324(负)之间、4.94E-324 到 1.797E308(正)之间和 0。) 类型的值,指定在定期偿还固定款项和利率不变的条件下,年金在给定期次内所支付的利息。

语法

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

IPmt 函数的语法包含以下参数 (参数:为操作、事件、方法、属性、函数或过程提供信息的值。):

参数 说明 rate 必选。类型为 Double,用于指定每期的利率。例如,如果获得年利率 (APR) 为 10% 的汽车贷款,并且每月还一次款,则每期的利率为 0.1/12(即 0.0083)。 per 必选。类型为 Double,用于指定还款期数,范围为 1 到 nper。 nper 必选。类型为 Double,指定年金的付款总期数。例如,如果汽车贷款为期四年,每月还一次款,则贷款的总还款期为 4 * 12(即 48)期。 pv 必选。类型为 Double,用于指定一系列未来还款或收入的现值或当前值。例如,您贷款买车时,贷款额是您每月要向贷款人支付的车款的现值。 fv 可选。类型为 Variant (Variant 数据类型:变量的默认数据类型,如果 Deftype 语句没有生效,则该数据类型没有类型声明字符。Variant 可以存储数值、字符串、日期/时间、Null 或 Empty 数据。),用于指定未来值或最后一次还款之后期望的现金余额。例如,一笔贷款的未来值为 ¥0,因为在最终付清这笔贷款之后其值为 0。但是,如果您要在 18 年中积蓄 ¥50,000 作为子女的教育费用,那么这 ¥50,000 就是未来值。如果省略,则默认为 0。 type 可选。类型为 Variant,用于指定何时还款。如果付款在期末到期,使用 0;如果付款在期初到期,使用 1。如果省略,则默认为 0。

注解

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

rate 和 nper 参数 (参数:为操作、事件、方法、属性、函数或过程提供信息的值。)必须使用以相同单位表示的付款周期进行计算。例如,如果 rate 用月计算,则 nper 也必须用月计算。

对于所有参数,现金支出(如存款)用负数表示;现金收入(如股利支票)用正数表示。

示例

 注释   以下示例演示了此功能在 Visual Basic for Applications (VBA) 模块中的使用。有关使用 VBA 的详细信息,请在“搜索”旁边的下拉列表中选择“开发人员参考”,然后在搜索框中输入一个或多个词条。

以下示例使用 IPmt 函数计算当每期还款额固定不变时支付的利息。给定以下参数:每期的利率 (APR / 12)、需要支付利息部分的还款期数 (Period)、总的还款期数 (TotPmts)、贷款的现值或本金 (PVal)、贷款的未来值 (FVal) 以及指示是在还款期期初还是期末还款的数值 (PayType)。

Dim FVal, Fmt, PVal, APR, TotPmts, PayTypeDim Period, IntPmt, TotInt, MsgConst ENDPERIOD = 0, BEGINPERIOD = 1FVal = 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 ThenPayType = BEGINPERIODElse PayType = ENDPERIODEnd IfFor Period = 1 To TotPmts    ' Total all interest.IntPmt = IPmt(APR / 12, Period, TotPmts, _-PVal, FVal, PayType)TotInt = TotInt + IntPmtNext PeriodMsg = "You'll pay a total of " & Format(TotInt, Fmt)Msg = Msg & " in interest for this loan."MsgBox Msg    ' Display results.