Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
楼主: hhzjxss

[习题] [分享]【VBA入门点滴】记帐凭证程序(VBA)

[复制链接]
 楼主| 发表于 2007-9-2 13:44 | 显示全部楼层

<div class="msgheader">QUOTE:</div><div class="msgborder"><b>以下是引用<i>特特</i>在2007-9-2 13:32:54的发言:</b><br/><p>给大雨泼泼冷水。</p><p>这个小程序跟我想象中的差好多。我的要求是:</p><p>1、输入记账凭证时,只需输入科目代码,比如现金的代码是101,我输完101后,相应的栏里显示的是“现金”,而非“101”</p><p>2、在输入时,自动提示科目代码,比如:我输入1,会有一个框显示所有资产类的科目供选择</p><p>3、在凭证查询时,可以要据不同需要进行查找,根据科目名称、凭证编号、摘要(可进行模糊查找)、分录金额、输入日期等各条件进行查找</p><p>4、凭证保存后自动填补断号</p><p>暂时就这几个条件,不知道大雨能不能帮忙实现?</p></div><p></p><p><font size="4">1、汗,本程序非我原创,是龙行天下求助,没有帮,我斗胆试了一下,那些代码不是我写的,我也没细写,再说水平有限。我只将科目代码和打印的整了一下。</font></p><p><font size="4">2、不过,在“录入记帐凭证”在“科目代码”列只需双击,就打开了输入窗体了,不要直接输入。</font> </p>
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
回复

使用道具 举报

 楼主| 发表于 2007-9-2 13:48 | 显示全部楼层

<p><font size="4">3、按你说的话,估计要用高级筛选查找就强多了。</font></p><p><font size="4">4、“填补断号”的意思不太明白,不是学财务的。其他功能也不想整得太复杂,自己用不上,呵,不上进了。</font></p>
回复

使用道具 举报

 楼主| 发表于 2007-9-2 13:48 | 显示全部楼层

<font size="5">5、谢谢小姐姐的批评指正,以后做东东一定多想想。等我进步的了请你吃饭!</font>
回复

使用道具 举报

 楼主| 发表于 2007-9-2 13:51 | 显示全部楼层

<div class="msgheader">QUOTE:</div><div class="msgborder"><b>以下是引用<i>特特</i>在2007-9-2 13:32:54的发言:</b><br/><p>1、输入记账凭证时,只需输入科目代码,比如现金的代码是101,我输完101后,相应的栏里显示的是“现金”,而非“101”</p><p>&nbsp;</p></div><p>现金是1001,不是101,我加了个提示,直接双击本列的单元格可以直接输入。 </p><p>&nbsp;</p><br/>
回复

使用道具 举报

发表于 2007-9-2 14:37 | 显示全部楼层

<div class="msgheader">QUOTE:</div><div class="msgborder"><b>以下是引用<i>特特</i>在2007-9-2 13:32:54的发言:</b><br/><p>给大雨泼泼冷水。</p><p>这个小程序跟我想象中的差好多。我的要求是:</p><p>1、输入记账凭证时,只需输入科目代码,比如现金的代码是101,我输完101后,相应的栏里显示的是“现金”,而非“101”</p><p>2、在输入时,自动提示科目代码,比如:我输入1,会有一个框显示所有资产类的科目供选择</p><p>3、在凭证查询时,可以要据不同需要进行查找,根据科目名称、凭证编号、摘要(可进行模糊查找)、分录金额、输入日期等各条件进行查找</p><p>4、凭证保存后自动填补断号</p><p>暂时就这几个条件,不知道大雨能不能帮忙实现?</p></div><p></p>特特说的 算是我们对记帐凭证的终极追求了&nbsp; <font color="#ff0066" size="5">智能代码 智能查找 补充断号</font>&nbsp;&nbsp; 等俺把VBA学好了再来做一个。我现在只能请大侠们做了先用着,有些高级的功能现在还有点不敢想。
回复

使用道具 举报

 楼主| 发表于 2007-9-2 15:31 | 显示全部楼层

<div class="msgheader">QUOTE:</div><div class="msgborder"><b>以下是引用<i>龙行天下8888</i>在2007-9-2 14:37:35的发言:</b><br/><div class="msgheader">QUOTE:</div><div class="msgborder">特特说的 算是我们对记帐凭证的终极追求了&nbsp; <font color="#ff0066" size="5">智能代码 智能查找 补充断号</font>&nbsp;&nbsp; 等俺把VBA学好了再来做一个。我现在只能请大侠们做了先用着,有些高级的功能现在还有点不敢想。</div></div><p><font size="4">目前基本实现你的要求了没有?</font></p>
回复

使用道具 举报

 楼主| 发表于 2007-9-2 22:22 | 显示全部楼层

路过一下!
回复

使用道具 举报

发表于 2007-9-3 12:29 | 显示全部楼层

我的要求已经达到了&nbsp; 谢谢你&nbsp; 现在已经能满足工作需要了 &nbsp;其他的高级功能不着急的
回复

使用道具 举报

发表于 2007-10-14 05:56 | 显示全部楼层

学习
回复

使用道具 举报

发表于 2007-10-15 13:12 | 显示全部楼层

载回学习
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-4-27 00:31 , Processed in 0.285889 second(s), 4 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表