ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 9190|回复: 20

[讨论] 固定资产折旧计算表

[复制链接]

TA的精华主题

TA的得分主题

发表于 2018-6-19 14:58 | 显示全部楼层 |阅读模式
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 zx168 于 2018-6-19 15:00 编辑

各位老师好!试着做了一个简易固定资产折旧计算表。基本思路是:根据查询年月、原值、入账年月、折旧年限、残值率五个指标来计算已折月数、本月折旧、本年折旧、累计折旧和净值。现就有些具体作法说明如下:
1、增加输入原值:主要考虑类别和使用部门查询用的是数据透视表,由于查询年月和入账年月不同的原因,有的资产显示原值,有的则不能显示原值,如果不增加一个输入原值,所有原值都会直接进入透视表,这样原值汇总就不准了。所以,加了一个条件,限制原值统计范围。
2、已折月数:这个是计算折旧关键字段。计算这个字段关键是求出查询年月和入账年月的相差数。根据折旧计提规定:当月入账的固定资产当月不计提折旧。还有,入账年月可以是1日,可以月末最后一天,但都算一个月。开始我想用datedif函数来计算,但经过实验相差月数有时有误差(有兴趣的朋友可以试一下),所以,我改用下面的函数(也是这个论坛朋友告诉我的,在此感谢),命名为A
A=(YEAR(实验!$C$1)-YEAR(table3[@入账年月]))*12+MONTH(实验!$C$1)-MONTH(table3[@入账年月])
已折月数限定在0和折旧年限*12之间,即:MEDIAN(A,0,折旧年限*12)
3、本月折旧加了两个条件来计算,好理解。
4、累计折旧:加了一个条,如果是最后一个月,直接用原值*残值率,如果不是最后一个月,累计折旧=已折月数*本月折旧
5、本来至此折旧表就基本成功了。但是在网上看到有人提出本年折旧概念,我是做财务的,觉得这个指标有意义。所以增加了一个本年折旧。所谓本年折旧就是查询年月中的当年的折旧,举例:如果查询年月为20186月,则1-6月折旧为本年折旧。我想了很久,可以直接计算出来,但非常的麻烦,有时会掉条件,后来,我根据查询年月来推算出上一年最后一个月的年月新字段。还是举例:如果查询年月为20186月,则这个新字段查询年月为201712月,然后根据201712月重新计算出已折月数1、本月折旧1、累计折旧1。很简单:本年折旧=累计折旧-累计折旧1
写了这多,供各位老师参考,提出宝贵意见。
1、思路是否有问题?
2、表中的函数是否还可以优化?特别是A=(YEAR(实验!$C$1)-YEAR(table3[@入账年月]))*12+MONTH(实验!$C$1)-MONTH(table3[@入账年月])
3、本年折旧是否有更好的办法?我目前只能是把已折月数1、本月折旧1、累计折旧1三列隐藏起来。
顺便告诉各位,我这张表计算结果与大牌财务软件计算出来是一样的。


固定资产折旧(试验).rar

31.23 KB, 下载次数: 813

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2018-6-19 17:52 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2018-7-4 17:55 | 显示全部楼层
非常需要这个,恳求能把后缀改成.xls.及另存为office 2003版本的,万分感谢

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-7-5 16:52 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 zx168 于 2018-7-5 16:56 编辑
wdhd 发表于 2018-7-4 17:55
非常需要这个,恳求能把后缀改成.xls.及另存为office 2003版本的,万分感谢

另存了一下,不行,有的函数不支持。2003太老了吧,你得换2016的,2016比2003强大多了。你是做财务的吗?

TA的精华主题

TA的得分主题

发表于 2018-7-8 11:19 | 显示全部楼层
zx168 发表于 2018-7-5 16:52
另存了一下,不行,有的函数不支持。2003太老了吧,你得换2016的,2016比2003强大多了。你是做财务的吗?

我是做财务,谢谢你,我再换软件吧,谢谢了,有问题再联系您

TA的精华主题

TA的得分主题

发表于 2018-8-16 16:12 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-8-17 14:52 | 显示全部楼层
可以增加一个字段:状态。状态可以分为在用、清理。可以增加报废,但报废如果再出现在表里意义不大,虚增了金额。所以如果出现报废的直接从表里删除,同时也可以增加一张表专门记录报废的资产,备查。

TA的精华主题

TA的得分主题

发表于 2018-8-20 16:43 | 显示全部楼层
您好 请教这个A怎么设置的?在哪个单元格输入?求教求教

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-8-21 08:10 | 显示全部楼层
清菓青橙 发表于 2018-8-20 16:43
您好 请教这个A怎么设置的?在哪个单元格输入?求教求教

看名称管理器

TA的精华主题

TA的得分主题

发表于 2018-9-19 11:48 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-3-29 21:11 , Processed in 0.056715 second(s), 10 queries , Gzip On, Redis On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表