基于ExcelVBA的融资租赁自动计算程序设计.docVIP

基于ExcelVBA的融资租赁自动计算程序设计 本文由shuitong2009贡献 pdf文档可能在WAP端浏览体验不佳。建议您优先选择TXT，或下载源文件到本机查看。 ２００８ 年 ５ 月 第 １１ 卷第 １０ 期 中 国 管 理 信 息 化 Ｃｈｉｎａ Ｍａｎａｇｅｍｅｎｔ Ｉｎｆｏｒｍａｔｉｏｎｉｚａｔｉｏｎ Ｍａｙ， ２００８ Ｖｏｌ．１１， Ｎｏ．１０ 基于 Ｅｘｃｅｌ ＶＢＡ 的融资租赁自动计算程序设计 何学武 （ 湖南工程职业技术学院， 长沙 ４１０１１４） ［摘 要］在融资租赁承租人的会计处理中，租赁开始日最低租赁付款额现值、 租赁资产入账价值、 未确认融资费用、 重新计算的实际分摊率及未确认融资费用在各期应确认的分摊额在手工方式下计算非常复杂。本文结合实际采用 Ｅｘｃｅｌ ＶＢＡ 程序设计功能建立其计算模型， 以简化计算工作。 融资租赁； 计算； 程序设计 ［关键词］Ｅｘｃｅｌ； ２００８） ０００７－ ０４ １０－ ［中图分类号］ Ｆ２３２ ［文献标识码］ Ａ ［文章编号］ １６７３－ ０１９４（ ２００６ 年财政部新发布了《 企业会计准则第 ２１ 号—— — 租赁》以下简称新租赁准则） （ ，根据该准则第十一条的规 定， 在租赁期开始日， 承租人应当将租赁开始日租赁资产 公允价值与最低租金付款额现值两者中较低者作为租入 资产的入账价值， 其差额作为未确认融资费用。第十五条 规定， 未确认融资费用应当在租赁期内各个期间采用实际 利率法进行分摊。 承租人应当采用实际利率法计算确认当 期的融资费用， 且应当根据租赁期开始日租入资产入账价 值的不同情况， 对未确认融资费用采用不同的分摊率。由 此可知，承租人要计算租赁开始日最低租赁付款额现值、 租赁资产入账价值、 未确认融资费用分摊的实际分摊率及 其各期应确认的分摊额，这在手工方式下计算非常复杂。 为此， 本文结合实例， 采用 Ｅｘｃｅｌ ＶＢＡ 程序设计功能建立 其计算模型， 以简化计算工作。 ［收稿日期］ ２００７－ １１－ １２ ［作者简介］ 何学武（ １９７０－ ）男， ， 湖南益阳人， 湖南工程职业技术 学院财会教研室讲师，长期从事会计电算化实践和理论教学与研究 工作。 例： ２００６ 年 １２ 月 １ 日，甲公司与乙公司签订了一份 租赁合同， ２００７ 年 １ 月 １ 日到 ２００９ 年 １２ 月 ３１ 日三年 从 期间内， 甲公司从乙公司租入塑钢机一台， 每半年付租金 １５０ ０００ 元， 租入日该机器的公允价值为 ７００ ０００ 元， 合同 规定半年利率为 ７％， 甲公司在租赁谈判过程发生的相关手 续费等为１ ０００ 元， 租期届满时， 甲公司享有优惠购买权， 买 估计该日此塑钢机的公允价值为 ８００ ０００ 元。 价 １００ 元， 根据实例， 利用 Ｅｘｃｅｌ ＶＢＡ 程序设计功能， 建立融资 租赁中承租人的计算模型， 步骤如下。 一、 设计最低租赁付款额现值计算模型 如图 １ 所示， Ｅｘｃｅｌ 工作簿的 ｓｈｅｅｔ １ 工作表的 １￣９ 在 行中建立基本数据， 其中基本数据区中的数据是根据实际 情况录入， 每期期末支付的租金” 但“ 一栏不直接输入数 据， 而是通过“ 租金录入及现值计算表” 录入每期应支付的 租金。这是考虑到模型的通用性， 在实际工作中有可能每 期支付的租金不同， 且租赁期限也不固定。此处采用了设 计“ 计算现值” 按钮调用自定义宏的方式， 根据租赁期限自 动产生如图 １ 所示的“ 租金录入及现值计算表”录入各期 ， !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 股价的显著下降通常会使公司陷入面临法律诉讼的境地。 此外， 通过网站发布的电子报告， 信息使用者在访问这些 报告时要经过网站的电子签名认证等过程， 公司也能通过 网络日志来了解哪些人、在什么时候访问了什么样的信 息。这就意味着公司和信息使用者之间订立了一项合约， 这种合约受到《 电子签名法》《 、合同法》 等法规的保护， 这种 合约的存在， 有助于降低法律风险。 ６． 连续报告还要考虑的其他问题。 在一个连续报告环 境下， 还会带来一系列其他的问题。如应该报告什么样的 信息， 应该如何报告； 公司系统中的数据库是否应该开放， 以允许使用者访问原始数据， 如果可以的话， 信息使用者 是否可以独自重新加工这些原始数据； 是否应该有一系列 的事先定义的过滤条件来抽取数据，如果是这样的话， 应 该设置一些什么样的条件； 我们是否应该考虑如何应用公 司系统中的“ 数字仪表板” 技术来评估和监控财务信息。此 外还有诸如连