LK868财务系统

lk868

<p>一个简单方便的财务系统经过一年多的努力终于可以运行啦，在此首先感谢EXCELHOME的各位版主还有各位VBA高手，这东东也是我做会计工作的好帮手哟(除帐簿外)。</p><p><br/> ZKLJyZCy.rar (138.6 KB, 下载次数: 397)

2007-8-7 22:29 上传

点击文件名下载附件
LK868财务系统

<br/>

[此贴子已经被作者于2007-8-12 11:36:39编辑过]

tycp

<p>你这个鸟东西,进都进不去,不知道放在这上面干吗?</p>

abcd321abcd

感觉还不错。

[此贴子已经被作者于2007-7-31 18:02:38编辑过]

xgirlwqh

<p>楼上的兄弟，作品要不就放出来共享，要不就不要放出来</p><p>放出来的东西不要搞什么限制，鄙视这种行为</p>

xrczld

<div class="msgheader">QUOTE:</div><div class="msgborder"><b>以下是引用<i>lk868</i>在2007-7-31 17:30:55的发言：</b><br/><p>一个简单方便的财务系统经过一年多的努力终于可以运行啦，在此首先感谢EXCELHOME的各位版主还有各位VBA高手，这东东也是我做会计工作的好帮手哟。</p><p><br/>管理员登陆，密码123456</p></div>楼主辛苦拉.做的很好.刚下后还没有仔细看.不过看了感觉挺不错的.顶一下.

yfxpzq

<p>可以看得出，楼主还是花费了一定的心思！赞一个。尤其是几个窗体，如TREEVIEW等做得很好，向您学习了！</p><p>不过，象If Sheets("总摘流").Range("BF2").Value &lt; Sheets("总摘流").Range("BF1").Value Then ''时间过期2007.12.1<br/>&nbsp;MsgBox "已到锁死期", vbCritical, "温馨提示"东东还是不用为好！没有什么实际意义吧-----个人之见，</p>

[此贴子已经被作者于2007-8-1 7:08:19编辑过]

xgirlwqh

<p>不过，象If Sheets("总摘流").Range("BF2").Value &lt; Sheets("总摘流").Range("BF1").Value Then ''时间过期2007.12.1<br/>&nbsp;MsgBox "已到锁死期", vbCritical, "温馨提示"东东还是不用为好！没有什么实际意义吧-----个人之见，</p><p>说的没错，作品要共享，就不要搞无意义的限制，谢谢</p>

xgirlwqh

<p>If Sheets("总摘流").Range("BF2").Value &lt; Sheets("总摘流").Range("BF1").Value Then ''时间过期2007.12.1<br/>&nbsp;MsgBox "已到锁死期，请与LK868（Q：476640791）联系", vbCritical, "温馨提示"<br/>&nbsp;&nbsp; UserForm1.CommandButton1.Enabled = False '''''查询按扭<br/>&nbsp;&nbsp;&nbsp; Sheet19.CommandButton10.Enabled = False '''''凭证表号码不能增加</p><p>还是尊重楼主的劳动成果，作品还不错</p>

无用

密码无用

tycp

<p>还不如用VB做,用EXCEL VBA 做就不要改变EXCEL的原貌,否则怎么看着就觉的别扭!</p>