做会计的同仁可以关注一下-银行存款余额调节表

hihxs

成为论坛会员已经好长时间了，在论坛中学到了很多知识。
也曾想有所表示，但可能是因为专业的关系，感兴趣的人不是很多。
在实际工作中用VBA做了不少小工具，但因为涉及公司数据的关系，不便发送。今天到论坛一逛，想起做过的“银行存款余额调节表”，做会计的朋友可能会感兴趣，所以，就发一个吧。。。。
看论坛的发贴，可知大家对电脑都比较感兴趣的，但在实际生活中我接触的会计，对电脑感兴趣的却比较少，但愿这次发的小东西能找到知音吧（我是做会计的）。。。
表格很简单，就是把银行对账单、企业账按相应的列复制到对应的表格中，期初数在数据区首行，金额也要填到发生额中（第一次用要填，以后会自动结转的）
两个表填好后，余额应与账面是相同的。然后到银行余额调节表工作表中，点击自动勾对，会将相同的对上。
然后在两个基础表中，筛选勾对标志是空的，这样会将银行账、企业账双方未对上的过滤出来，然后人工填加序号核对，如果不对，标题行为变红。应该对上。
最后对不上的就是未达账项，到调节表中，点生成调节表，就可以了。
下月使用时点结转下期，会另存新的一月的工作簿，起名规则是：如果工作簿尾名是四位表示年月的，会自动填加，并在次年自动变为1月，如文件名为：农行-0806，会变为农行-0807
.如果文件的前四位也是这样的话，也是同理处理。如果都不是，应是文件名+1.
还有，这个表是一个账户一个表，月月延续往下做的。。。
可能做起来容易，说起来难，我真的不想说太多的废话，大家一用便知，请见谅。

补充：两个基本表超1000行生成调节表有错误（没想到有人会用那么多，呵呵），到VBE里用查找替换的方法，先将10000换成1000，再将1000替换成3000（应该够了）就好了

[ 本帖最后由 hihxs 于 2009-9-13 13:17 编辑 ]

wshcw

先做过记号,有时间到自己的电脑上下载.

lhlxl

试了试不错，具体操作也简单,谢谢楼主了但是数据多了出现“运行时错误‘1004’，不能设置类Border的LineStyle属性，本人是菜鸟，楼主能不能将数据多的情况考虑进去，我的1千多行。

[ 本帖最后由 lhlxl 于 2009-9-11 10:34 编辑 ]

xique

试试,看一下,谢谢提供!

xique

不错，不过怎么不能运行！

hihxs

有朋友说1000多行的数据出现了1004的错误，我测试了一下，在我的电脑上没有发生，不知原因在那儿。
倒是发现了另一个问题，因为我每月的数据都是300行左右，所在两个基本表里的余额公式和未达账类型公式，只设到了1000行，超过1000行就没有未达账项类型，导致生成的调节表不全。。。。
大家可以打开VBE，用查找换的方法，将1000替换成10000，这样就好了

510979391

参考下，谢谢

lhlxl

原帖由 hihxs 于 2009-9-13 12:57 发表
有朋友说1000多行的数据出现了1004的错误，我测试了一下，在我的电脑上没有发生，不知原因在那儿。
倒是发现了另一个问题，因为我每月的数据都是300行左右，所在两个基本表里的余额公式和未达账类型公式，只设到了1 ...

补充：两个基本表超1000行生成调节表有错误（没想到有人会用那么多，呵呵），到VBE里用查找替换的方法，先将10000换成1000，再将1000替换成3000（应该够了）就好了，这两个是不是重复了，只要将1000改成3000是不是就可以了，不用改10000再改到1000？

yiyirang

学习学习了

lhlxl

请楼主看看这个附件，第一次做调节表是正确，第二次就出现错误了, 谢谢楼主回复了，但是问题没有解决啊,在严格论坛上看说是  这是因为参数"xlInsideHorizontal"的问题.
因为所选的单元格中,没有相应的"里面的水平线",所以出错!，不知道怎么做，

[ 本帖最后由 lhlxl 于 2009-10-2 21:56 编辑 ]