Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-模块/函数/VBA

净现值函数

时 间:2022-02-26 10:27:25
作 者:杨雪   ID:42182  城市:南京
摘 要:此页面特定于 Office 2010 的 Visual Basic for Applications (VBA) 语言参考。
正 文:

返回一个Double,指定基于一系列定期现金流(付款和收款)和贴现率的投资的净现值。

语   法:
NPV(率,值())
NPV函数具有以下命名参数:

部分描述:
速度 必需的。Double指定整个期间的贴现率,以小数表示。
值() 必需的。指定现金流值的Double数组。该数组必须至少包含一个负值(付款)和一个正值(收据)。

评   论:
投资的净现值是未来一系列收支的现值。
NPV函数使用数组中值的顺序来解释付款和收款的顺序。请务必按正确的顺序输入您的付款和收据值。
NPV投资开始于第一个现金流值日期之前的一个时期,并以数组中的最后一个现金流值结束。
净现值计算基于未来现金流量。如果您的第一个现金流出现在第一个期间的开始,则第一个值必须添加到NPV返回的值中,并且不得包含在values ( )的现金流值中。
NPV函数类似于PV函数(现值),不同之处在于PV函数允许现金流在期末或期初开始。与可变NPV现金流值不同,PV现金流必须在整个投资过程中固定。

例   子:
此示例使用NPV函数返回数组 Values() 中包含的一系列现金流的净现值。RetRate 代表固定的内部收益率。
Dim Fmt, Guess, RetRate, NetPVal, Msg
Static Values(5) As Double    ' 设置数组.
Fmt = "###,##0.00"    ' 货币的定义格式.
Guess = .1    ' 10%开始.
RetRate = .0625    ' 设置固定内部汇率.
Values(0) = -70000    ' 创业成本.
' 反映连续四年收入的正现金流.
Values(1) = 22000 : Values(2) = 25000
Values(3) = 28000 : Values(4) = 31000
NetPVal = NPV(RetRate, Values())    ' 计算净现值
Msg = "这些现金流的净现值为"
Msg = Msg & Format(NetPVal, Fmt) & "."
MsgBox Msg    ' 显示净现值.


Access软件网官方交流QQ群 (群号:54525238)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助