Excel会计信息化作业完成版.docx
《Excel会计信息化作业完成版.docx》由会员分享,可在线阅读,更多相关《Excel会计信息化作业完成版.docx(11页珍藏版)》请在冰豆网上搜索。
Excel会计信息化作业完成版
Excel会计信息化作业
程序预览
1.登陆界面
介
绍:
登陆界面时设置程序只会显示菜单页,起到有权限的用户才可以进入。
实现的方法是在程序每次关闭时都运行一个自动关闭的宏Auto_Close,进行深度隐藏除菜单页的其他工作表。
进入系统要求输入密码,用if来实现,修改密码必须去相关宏中进行改动。
密码输入正确后宏中关闭其他工作表的隐藏,并且跳到记账凭证表中。
对于自动宏,要改变宏的安全性设置为低。
相关隐藏工作表的宏在后面宏截图中体现。
程序预览
2.记账凭证页
介
绍:
通过制作表格,引入函数实现科目名称的自动计入。
为了记账方便,再添加了三个按钮,分别是对时间的快速填充,清除以上全部填入的数据,和结转当前凭证。
使用当前按钮是通过引入函数Today得到日期,并复制到指定位置进行选择性粘贴实现。
清除按钮是用录制宏的方法制作的。
调用窗体设置按钮为ctrl+Q实现。
同时对表格进行设置格式,只允许在阴影部分填充数据。
相关宏见后表
(续)记账凭证页
程序预览
3.汇总凭证界面
4.
介
绍:
这里由记账凭证结转而来,同时加入了一个按钮,计算出借方和贷方的合计金额。
宏计算结果的实现方法:
在实际的操作中,发现只有对变化的区域进行命名后才能够使用函数Sum,而不能直接用变化的sum(cells(1,6):
cells(x,6))来实现。
宏要能够正确执行需要的是必须结转填写写上日期的记账凭证。
相关宏见后表
程序预览
4.科目界面
介
绍:
在宏中为了使提高程序的运行效率,只将科目函数km查找范围控制在30,因为在实际工作过程中,这科目表应该是填写完整的,如果每次引用函数km都要去计算一遍它的查找范围,浪费了系统资源,所以控制在实际填写的大一点的范围。
提
示:
宏的排版顺序以按照系统的打开会遇到宏的顺序排版
1 登陆页(密码验证)
2 记账凭证页(结转,清除,填充日期,科目函数及窗体显示,窗体)
3
汇总凭证(计算借贷金额)
4 退出程序时(菜单页退出,自动宏)
(1)登陆页(密码验证以及关闭相关页的隐藏)
(2)记账凭证页(结转,清除,填充日期,科目函数及窗体显示,窗体)
(
(3)汇总凭证(计算借贷金额)
(4)退出程序时(菜单页退出,自动宏)