宇航账务系统excel+access版代码全开放！《原创》

lanyuu

基于excel2003，绝对原创，根据多年来的财务会计经验编制，现在处于开发阶段，数据库基本定型
现在可以方便的使用，未完成模块为权限控制，辅助帐查询，报表系统。

系统很小，处理速度超快！
希望大家保留本人版权

附件已更新
最新版本v0.95，实在是没有时间做，加夜班的时候细化一下，账表系统基本完善，只剩下美工及联查凭证。
账务处理部分也基本完成，剩余未完成模块：权限设置、记帐（可有可无，不影响报表及帐簿查询），损益自动结转，年度账结转
以上模块未完成也可以使用
简单的说一下操作吧
以管理员的身份进入，密码456可以重建账套，清除测试数据，如果想看看原来的数据，可以看完后再重建
以其他的身份进入，密码123，可以进行其他的操作，密码都可以在进入的时候修改
重建账套后可以以普通身份进入，设置会计科目和项目档案，项目档案相当于下级科目，据本人多年使用用友的经验，比较好用，具体可以进入测试账套看一下简单的凭证，了解一下项目的使用
会计科目及项目档案设置后就可以开始录入期初余额了，只要不把期初结账，随时可以录入期初余额，录入完成点保存
期初余额录入完成后基本账务处理就在凭证处理模块来完成，凭证处理模块包括查找、新增、删除、修改、复制、查看、损益结转几项，我想这个都不用我一一介绍了，查找后选择凭证点相应的按钮就行了
凭证按常用的分为现收，现付，银收，银付，转账五类，做了相应的科目限制
数据都保存在子目录database中，注意备份
基本完成，剩下打印，美工，及账表中的联查凭证，如果没有人用于实际，估计不会继续开发了
比较费神
----------------------------
最新版本在 http://club.excelhome.net/thread-375183-1-1.html

[ 本帖最后由 lanyuu 于 2009-4-19 15:35 编辑 ]

ahhnztz

谢谢您，我正需要！！！
写得非常棒，非常感谢您!

gaohong33

很不错的。谢谢分享！

renkebu

谢谢你又给会计人员提供学习的地方！

nowdeed

謝謝！！！！

yuchengjz

谢谢楼主,谢谢呵

nowdeed

謝謝！！！

jqinfo

不错。
希望能够给个操作说明，以便快速上手。

lanyuu

简单的说一下操作吧
以管理员的身份进入，密码456可以重建账套，清除测试数据，如果想看看原来的数据，可以看完后再重建
以其他的身份进入，密码123，可以进行其他的操作，密码都可以在进入的时候修改
重建账套后可以以普通身份进入，设置会计科目和项目档案，项目档案相当于下级科目，据本人多年使用用友的经验，比较好用，具体可以进入测试账套看一下简单的凭证，了解一下项目的使用
会计科目及项目档案设置后就可以开始录入期初余额了，只要不把期初结账，随时可以录入期初余额，录入完成点保存
期初余额录入完成后基本账务处理就在凭证处理模块来完成，凭证处理模块包括查找、新增、删除、修改、复制、查看几项，我想这个都不用我一一介绍了，查找后选择凭证点相应的按钮就行了
凭证按常用的分为现收，现付，银收，银付，转账五类，做了相应的科目限制
数据都保存在子目录database中，注意备份
写这个太累了，有需要的可以联系我
另外报表公式可以自己设置，也很简单，相当于excel自带函数，数据更新后需要重算，可以根据我设的公式来设置

lanyuu

Function qmye(nian As String, yue As Integer, kemu As String)
'期末余额
Function qcye(nian As String, yue As Integer, kemu As String)
'期初余额
Function bqjf(nian As String, yue As Integer, kemu As String)
'本期借方
Function bqdf(nian As String, yue As Integer, kemu As String)
'本期贷方
Function jflj(nian As String, yue As Integer, kemu As String)
'借方累计
Function dflj(nian As String, yue As Integer, kemu As String)
'贷方累计
nian代表年，yue代表月，kemu代表科目