《运用EXCEL VBA语言构建融资租赁成本分析模型论文.docx》由会员分享，可在线阅读，更多相关《运用EXCEL VBA语言构建融资租赁成本分析模型论文.docx（8页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、运用EXCELVBA语言构建融资租赁成本分析模型论文运用EXCELVBA语言构建融资租赁成本分析模型论文从广义上讲，融资也叫金融，就是货币资金的融通，当事人通过各种方式到金融市场上筹措或贷放资金的行为。从当代经济发展的状况看，作为企业需要比以往任何时候都愈加深入，全面地了解金融知识、了解金融机构、了解金融市场，由于企业的发展离不开金融的支持，企业必须与之打交道。下面是学习啦我为大家精心准备的：运用EXCELVBA语言构建融资租赁成本分析模型相关论文。内容仅供参考浏览!运用EXCELVBA语言构建融资租赁成本分析模型全文如下：资租赁是企业资本运营的一种新途径，它本质上是融通资金与设备购买为一体的
2、复合型贸易方式。承租企业只须定期支付租金，就能从租赁公司获得所需的机器设备，并在一定期限内享有专用权，租期结束时还能够选择续租、留购等形式获得租赁物的所有权。融资租赁手续比拟简单，还款方式比拟灵敏，很多企业，尤其是中小型企业，一方面自有资金紧缺，外部融资渠道狭窄，另一方面又急需先进的生产设备，在这种窘境中，融资租赁无疑是很好的选择。在进行设备融资租赁决策时，涉及的影响因素很多，租赁双方一般在租赁合同中仅约定设备价款、租赁时间、手续费率、租金支付方式等，某一项或者几项因素发生变动，都会给承租方决策带来影响。实际的租赁成本需承租方本人测算，假如单纯依靠手工进行计算，不但复杂和繁琐，而且准确度也会遭
3、到影响，必将影响到企业融资决策的质量。笔者结合多年企业管理实践经历和理论研究，运用ExcelVBA函数，设计出具有一定通用性的融资租赁成本分析模型，承租企业财务人员仅需要根据租赁合同的约定，录入相关变动因素即可得出租赁方案能否可行的结论，对于企业进行融资租赁活动具有很强的现实意义。一、等额年金法下运用EXCEL函数构建融资租赁成本计算模型在目前的实务中，大多数情况下，租赁企业采用等额年金法核算租金。在这种方法下，企业每期支付的租金由融资费用和应付本金组成，且每期支付的租金金额相等。例：甲公司计划融资租入A大型设备，经与融资租赁公司协商后，双方约定：租赁开场日租赁资产的公允价值是500000元，
4、年利率7%，年管理费率3%，租期为5年，租金每半年支付一次，每期期末等额支付。租期结束时甲公司按合同约定支付名义价款100元后，该设备产权转移至甲公司名下。 (一)建立模型数据区根据图1所示建立融资租赁成本计算分析表的数据区。其中：阴影部分标识的项目租赁成本、租期、名义年利率和手续费率能够随着实际情况利用滚动条进行调整，滚动条的数据变动幅度从-80%到120%;名义货价是固定值，可随着租赁条件的变化，直接在B12单元格调整。其他项目均通过EXCEL函数公式来计算确定，租金支付方式下拉框分为期初和期末两种支付形式;支付频率下拉框分为按年支付、按季支付、按半年支付、按月支付四种情况。 (二)定义等
5、额年金法下模型相关公式1.每年付款次数。年付租金次数根据支付频率的不同会有不同变化，比方每半年付款一次，一年付款两次;每季度付款一次，一年付款四次，以此类推。在B7单元格输入公式=IF($B$5=按年支付，1，IF($B$5=按半年支付，2，IF($B$5=按季支付，4，12)。这里采用了EXCEL的IF嵌套语句，执行真假值判定。根据逻辑计算的真假值，返回不同结果，对数值和公式进行条件检测。2.总支付期数。在B8单元格输入=$B$6*$B$7在C8单元格输入=C6*B7，即为租期变化后总支付期数的变化情况。3.计算年利率。是指根据支付频率的不同，在运用公式进行相关运算时，为了函数设置公式能够简
6、洁所使用的利率。在B10单元格输入=B9/B7，即随着支付频率不同介入计算的名义利率的变化情况。在C10单元格输入=C9/B7，即随着其他条件变化后，介入计算的名义利率的变化情况。4.等额年金法下租金确实定。等额年金法租金的计算主要有先付租金和后付租金两种形式，若在每期期初支付租金，即可视为预付年金，公式为：A=P/(P/A，i，n-1)+1其中：A为每期租金，p为实际租赁成本，I为每期的利率，n为总支付期数。若在每期期末支付租金，即可视为普通年金，公式为：A=P/(P/A，i，n)在B13单元格输入=IF(B4=期初，B3*(1+B11)/(1-1/(1+B10)(B8-1)/B10)+1)
7、，B3*(1+B11)/(1-1/(1+B10)B8)/B10)，在C13单元格输入=IF(B4=期初，C3*(1+C11)/(1-1/(1+C10)(C8-1)/C10)+1)，C3*(1+C11)/(1-1/(1+C10)C8)/C10)，即随着相关条件变化，租金的变化情况;在D13单元格输入=(C13-B13)/B13，即随着其他条件变化，租金变动百分比。5.最低租赁付款额确实定。最低租赁付款额=各期租金之和+行使优惠购买选择权支付的金额，则在B13单元格输入=B13*B8+B12。6.最低租赁付款额现值确实定。最低租赁付款额的现值=每期租金(P/A，I，n)+名义货价(P/F，I，n)
8、，即在B13单元格输入=B13*(1-(1/(1+B10)B8)/B10)+B12*(1/(1+B10)B8)。按租赁会计准则规定，固定资产的入账价值按租赁开场日租赁资产的公允价值与最低租赁付款额的现值两者中的较低者入账。本例中，计算后最低租赁付款额的现值为515070.89元，大于租赁开场日租赁资产的公允价值500000元，所以租入资产入账价值应为公允价值500000元。C13单元格输入=C13*(1-(1/(1+B10)B8)/B10)+B12*(1/(1+B10)B8)，即随着其他条件变化，最低租赁付款额现值的变化情况。7.未确认融资费用确实定。未确认融资费用=最低租赁付款额-租赁开场日
9、租赁资产的入账价值。在B16单元格输入=B14-B3在C16单元格输入=C14-C3，即为随着其他条件变化，未确认融资费用的变化情况。8.实际资本成本确实定。承租人应当采用实际利率法计算确认当期的融资费用。实际资本成本，也称为未确认融资费用分摊率，是分摊未确认融资费用的关键步骤。未确认融资费用应当在租赁期内各个期间进行分摊，我们采用内插法计算实际资本成本如下：租赁开场日最低租赁付款额的现值=租赁开场日租赁资产公允价值即：租金(P/A，I，n)+名义货价(P/F，I，n)=500000当i=i1时，P=P1;当i=i2时，P=P2;则i=?，P=500000，利用内插法可得： (i-i1)/(i
10、1-i2)=(500000-P1)/(P1-P2)在表格中分别输入变换i值，通过函数计算可得P1和P2，解得i=8.1869%。在B17单元格输入=IF(B4=期初，RATE(B8，-B13，B3，-B12，1)，RATE(B8，-B13，B3，-B12，0)*B7，在C17单元格输入=IF(B4=期初，RATE(C8，-C13，C3，-C12，1)，RATE(C8，-C13，C3，-C12，0)*B7，即随着其他条件变化，实际资本成本的变化情况。此处用到了RATE函数，该函数用于计算复利利率，但是其参数年金要与终值或者现值的正负方向相反。二、运用EXCELVBA构建融资费用分摊模型运用EXC
11、ELVBA语言设计融资费用分摊计算表，先要如图2所示建立融资费用分摊测算表格的基本数据区。其中：确认融资费用=每期期初应付本金余额实际资本成本(未确认融资费用分摊率)应付本金减少=每期租金-确认融资费用应付本金(余额=每期期初应付本金余额-应付本金减少，运用EXCEL函数可以实现融资费用分摊的测算，但是当租金支付期数发生变化后，此表格需要调整公式重新测算，比拟繁琐。假如采用VBA语言来定义，即可大大简化每次因数据变动带来的公式调整的费事，而且能够比拟准确地自动测算出每期费用分摊情况，不受支付期数等因素变化的限制，极大地提高了效率。通过运用VBA语言定义融资费用分摊测算表，在租赁条件租赁成本、租期、支付方式、支付频率、名义年利率、手续费率、名义货价等任一项或者几项发生变动后，点击费用分摊表的执行分摊测算按钮，很直观地看到每期融资费用、本金减少及应付本金的变化情况，即可完成对费用分摊的测算工作。三、结语本文借助EXCELVBA，针对企业融资租赁设备的实际情况，构建了融资租赁成本的分析模型。在各项相关指标发生变化时，财务管理人员不再需要进行复杂的数据推演，就能够很容易地得出变化后的影响结果，据此作为与出租方会谈的根据，为决策提供可靠的数据支持。在目前融资租赁活动日趋频繁的各个行业，此模型具有较为广阔的应用环境，能够提高企业管理决策水平，使企业增加在投融资活动中的经济效益。