会计业务的EXCEL设计与实现--实验报告内容要求VIP免费

实验报告课程名称管理信息系统实验项目名称会计业务的EXCEL设计与实现班级与班级代码财务管理3班实验室名称（或课室）专业：财务管理任课教师：林韩辉学号：08250202308姓名：陈景玲实验日期：2011年4月23日广东商学院教务处制姓名陈景玲实验报告成绩评语：指导教师（签名）年月日说明：指导教师评分后，实验报告交院（系）办公室保存。管理信息系统实验报告一、实验目的熟悉Excel的基本操作，掌握利用Excel进行数据处理的主要方法以及VBA编程方式。二、实验原理管理信息系统分析方法、工具、模型等。三、实验设备计算机、Excel等。四、实验报告正文（一）数据准备1、要在Excel里进行VBA程序的编写、编译与运行，你首先碰到了一个什么问题请用图示方式写出解决的方法(即宏的安全性设置)。答：刚打开实验用的EXCEL表，就弹出一个对话框。此时，应该把宏的安全性设置到最低。具体操作如下：工具→宏→安全性→安全级选“低”（如下图1）所示→可靠发行商（选中“信任对VBA项目的访问”复选框，如下图2所示）→确定。把宏的安全性设置为最低，允许对VBA项目的访问，我们才可以顺利进行这项实验。另外，如果按照以上步骤设置了宏，但表格毫无反应，应关闭EXCEL表格，再重新打开。2、描述你的Excel文件初始数据（凭证/总帐/损益表/资产负债表）是如何建立和修正的？答：a.总账首先，先把实验资料中提供的初始格式复制过去。然后大概操作与下面的几个表相同。b.损益表1.在操作损益表的VBA自动程序生成时，发现实验资料的所写的程序中行数的序号与EXCEL的有差别，所以，先把整个程序拷贝到宏的VBA编写器的模块3中，删掉多余的序号行和列，然后把所有行数减1.例如：把bl(4)=Application.SumIf(Range("a:a"),501,Range("e:e"))中的“4”变成“3”，以此类推，则bl(8)=bl(4)-bl(5)-bl(6)-bl(7)也要变成bl(7)=bl(3)-bl(4)-bl(5)-bl(6).修改完后运行，就可以得出损益表的“本月数”。同理，损益表“累计数”的操作和“本月数”的操作基本相同。但还需要把“b”替换成“c”.运行即可。2.在操作损益表单元格式生成时，主要是把公式复制粘贴到每一个单元格里但仍然有问题需要注意的是：把“=b4-b5-b6-b7”改为“=B3-B4-B5-B6”。所有涉及到序号的都要减1.这样才能得到一张完整规范的损益表。C.资产负债表1在资产负债表单元格生成时，为了方便，我直接把公式复制到每一个单元格，发现有些公式显示错误，结果无法显示。经过仔细检查，发现是格式问题。所以直接自己输入公式，这才显示正确的结果。2、在资产负债表VBA自动程序生成时，由于实验资料所给的程序不全，需要自己补充完整。于是我开始自己尝试着摸索。发现只要理解了每一个会计科目，就可以很容易编写程序。例如：应收账款净额=应收账款-坏账准备。由于“坏账准备”前面已经有了负号，所以正确的程序应该是：Range("b7")=Application.SumIf(Range("总帐!a5:a9"),"<121",Range("总帐!c5:c9"))Range("c7")=Application.SumIf(Range("总帐!a5:a9"),"<121",Range("总帐!f5:f9"))再如比较复杂的是未分配利润。它等于所给的费用类科目和营业收入、营业成本等加总。所以正确的程序应该是：Range("e15")=-Application.SumIf(Range("总帐!a14:a23"),">321",Range("总帐!c14:c23"))Range("f15")=-Application.SumIf(Range("总帐!a14:a23"),">321",Range("总帐!f14:f23"))。（二）设计实现1、举例（用总帐、损益表或资产负债表）说明单元格生成方式中，主要公式所代表的含义。以损益表中的公式为例：①“营业收入”=sumif(总账！a:a,"=501",总账！e:e)，即“营业收入”取自总账501科目，本期数取贷方合计数。②“营业成本”=sumif(总账！a:a,"=502",总账！d:d)，即“营业成本”取自总账502科目，本期数取借方合计数。③“经营利润”=b3-b4-b5-b6,即等于营业收入-营业成本-营业费用-营业税金及附加。④“营业利润”=b7-b8-b9,即营业利润等于经营利润扣除了财务费用和管理费用后的所得。2、用图示方式写出VBA编程方式的操作过程，配以适当的文字说明。①打开EXCEL表，单击工具栏，选择“宏”命令，在下级菜单中选择“visualBasic编辑器（v）”,如下图所示...