Excel会计信息化教学课件 作者 刘曜 第9章固定资产管理.pptVIP

For t = 4 To x - 1 If Sheets(固定资产管理).Cells(t, 13).Value = 1 Then Cells(t, 10) = Cells(t, 10)) + 1 End IfNext t 示例：教材P96 假定设备A、B和C分别于2000年第3、7和8月开始启用（当前月为2000年8月）。 在系统使用时作如下的要求： （1）当月启用的固定资产，记入系统时，“计提折旧期数（月）”和“是否应提折旧”栏均输入0（“是否应提折旧”栏输入0表示不应提折旧）。如设备C。 （2）上月启用的固定资产，将“是否应提折旧”栏数字0改为1（“是否应提折旧”栏输入1表示应提折旧）。如设备B。 （3）因超过使用期或出售、报废等不再计提折旧的固定资产，将“是否应提折旧”栏数字1改为0。 问题： 会不会出现计提折旧期数（月）大于预计使用期限（月）的情况？ 按第（3）条要求，一旦固定资产提足折旧（超过使用期），即将“是否应提折旧”栏数字1改为0。这样，执行计提折旧宏时计提折旧期数（月）就不会再增加。 也就是说，计提折旧期数（月）数字最大达到预计使用期限（月）。 9.4 折旧函数 * 第9章固定资产管理 9.1 “固定资产管理系统”的设计 教材P93，设计步骤如下： （1）以Excel一张工作表的一行反映一项固定资产的资料。 （2）用公式建立每一项固定资产数据之间的关联关系。 在“本月应提折旧额”栏公式中的IF函数使用了嵌套的方法。 如“=IF(M4=0,0,IF(J4E4,H4,G4-(E4-1)*H4))”。 第一层“IF(M4=0,0,IF(…))”的意义为如果“是否应提折旧”栏为0，那么，本月应提折旧额为0（约定，“是否应提折旧”栏下为1表示该项固定资产应提折旧，而是0表示该项固定资产不提折旧）；否则，执行下一层条件函数。 第二层“IF(J4E4,H4,G4-(E4-1)*H4)”的意义为，如果计提折旧期数（月）小于预计使用期限（月），那么值为月折旧额；否则，计提折旧期数（月）等于预计使用期限（月），也就是最后一期折旧，那么本月折旧额采用倒减，即用应提折旧总额减去已提折旧额。 （3）设计一个宏，自动计算所有固定资产的“计提折旧期数（月）”和自动填充记录公式。 宏见教材P94。 9.2 关于“计提折旧”宏的说明 “计提折旧期数（月）”指标要求，如果不折旧，该指标不动；如果要折旧，需在上月数字上加1。 这一功能是通过下面的代码实现的： 以上5行为一组计数式循环语句，执行时，从固定资产管理工作表坐标为第4行第13列的单元格起，到坐标为第x - 1行第13列的单元格止，一一判断，如果单元格值为1，那么该单元格所在第t行的Cells(t, 10)单元格数值自动加1。 9.3 “固定资产管理系统”应用示例 *