wps表格中怎么计算平均分(WPS表格的JS宏开发入门3--实现平均年限折旧计算法)

首页教程更新时间:2023-05-16 10:17:11

因为疫情,和家人两地的我又开始了自己一个人生活,所以我化悲愤为创作!今天给大家带来在WPS表格中用JS宏实现平均年限折旧计算法。平均年限法又称为直线法,是将固定资产的折旧均衡地分摊到各期的一种方法。采用这种方法计算的每期折旧额均是等额的。计算公式为年折旧率=(1-预计净残值率)/预计使用年限×100%。这是最简单的折旧法,先看代码:

if (alg=="平均法"){ var lost_year=(in_value-last_value)/life_year var lost_rate=lost_year/in_value for (var i=1;i<=life_year;i ){ Worksheets.Item("计算器").Cells.Item(i 4,1).Value2=i Worksheets.Item("计算器").Cells.Item(i 4,3).Value2=lost_year Worksheets.Item("计算器").Cells.Item(i 4,3).NumberFormatLocal ="¥#,##0.00;¥-#,##0.00" Worksheets.Item("计算器").Cells.Item(i 4,2).Value2=lost_rate Worksheets.Item("计算器").Cells.Item(i 4,2).NumberFormatLocal = "0.00%" Worksheets.Item("计算器").Cells.Item(i 4,4).Value2=Worksheets.Item("计算器").Cells.Item(3,2).Value2-i*lost_year Worksheets.Item("计算器").Cells.Item(i 4,4).NumberFormatLocal ="¥#,##0.00;¥-#,##0.00" } }

在以上代码,通过判断alg变量内容判断是否使用平均法计算,如果是,则先计算每年折旧额lost_year等于入账金额in_value减去最后残值last_value后除以预期使用寿命,然后每年折旧额lost_year除以入账金额in_value得到折旧率lost_rate,然后通过 一个For循环依次计算每年的折旧值、折旧率以及账面剩余价值。这是一个很简单的算法,如果你是一个VBA开发者可以发现和VBA开发相比仅仅是部分语法和API调用的区别,整体没什么难度。需要注意还是赋值使用的是value2属性而不是value属性。

我是且行且思,一个程序员/数据分析师/金山办公KVP,终身学习者,不定时和大家分享知识和好书。

,
图文教程
相关文章
热门专题
推荐软件
奇热小说
奇热小说
下载
QQ2019手机版
QQ2019手机版
下载
王者荣耀
王者荣耀
下载
百度浏览器迷你版
百度浏览器迷你版
下载
2345浏览器手机版
2345浏览器手机版
下载
网易邮箱
网易邮箱
下载
爱奇艺
爱奇艺
下载
网易云音乐
网易云音乐
下载
WPSOffice
WPSOffice
下载
优酷
优酷
下载
谷歌浏览器(Chrome)
谷歌浏览器(Chrome)
下载
迅雷看看播放器
迅雷看看播放器
下载
UC浏览器
UC浏览器
下载
QQ音乐
QQ音乐
下载
阿里旺旺买家版v9.12.10C官方版
阿里旺旺买家版v9.12.10C官方版
下载
360安全卫士v12.1官方版
360安全卫士v12.1官方版
下载
猜你喜欢
欢乐叠积木
欢乐叠积木
下载
石阡在线
石阡在线
下载
BlazeMediaPro5.18
BlazeMediaPro5.18
下载
wlan热点创建工具1.1绿色版
wlan热点创建工具1.1绿色版
下载
超级作业助手
超级作业助手
下载
像素行动不同的游戏
像素行动不同的游戏
下载
王者荣耀小鸡修改器
王者荣耀小鸡修改器
下载
榆林教育
榆林教育
下载
哔啵岛物语
哔啵岛物语
下载
全民飞机大战修改版
全民飞机大战修改版
下载
模拟人生4蝴蝶项链MOD
模拟人生4蝴蝶项链MOD
下载
嬉游大乱斗
嬉游大乱斗
下载
叫卖录音宝
叫卖录音宝
下载
红河特色小吃
红河特色小吃
下载
黑桃冰雪
黑桃冰雪
下载
解锁我
解锁我
下载