[原创]分享我的输单工具（添加了授权码生成器+ 自动添加菜单）

Moneky

需要注册系统的朋友，请查看http://club.excelhome.net/viewthread.php?tid=274938&px=0

我们工厂需要输入像下图中的这种表格，即A列编号不重复，同一个编号后面对应很多列数据（我这里是按日期分列），以前我们同事输入的方法是全手工输入，经常要先查找编号(看看将要输入的编号有没有输过，没有则在最后添加），然后在拖动滚动条到对应的日期列，再填入数据。这样效率十分低，于是便帮忙写了这个输单工具，现在输单只需要输入货号按一下Enter再输入数量再按一下Enter 。

[此贴子已经被作者于2007-12-19 23:19:42编辑过]

Herman99

谢谢楼主提供分享,学习!

tycp

牛比!!

bai2000

能否做成标准的excel？不用vbLink.ocx                    ，特别注册机部分特想要，哪位能单独把注册部分提出来

fankairong

麻烦楼主看看这是怎么回事,用不了

Moneky

QUOTE:

以下是引用bai2000在2007-8-19 8:03:56的发言：

能否做成标准的excel？不用vbLink.ocx                    ，特别注册机部分特想要，哪位能单独把注册部分提出来

vbLink.ocx 可以用vba自带的Lable控件替换，不影响使用。甚至连代码都不需要更改(注意替换后的Lable的Name要和被替换的vbLink的Name一样)，我用vbLink.ocx的初衷是用来模拟卡巴斯基界面中的超级链接效果(我不是卡饭，我用Mcafee)。

另外注册部分，只是我用来练习的，不是很好，代码也很乱，可能没有什么参考的价值，实在想研究的话废点心慢慢看吧。主要用到了MD5加密模块（模块是直接引用的网上现成代码，我只改了几条语句）

[此贴子已经被作者于2007-8-19 11:03:30编辑过]

Moneky

QUOTE:

以下是引用fankairong在2007-8-19 8:28:14的发言：

麻烦楼主看看这是怎么回事,用不了

请你确认一下是哪些对象好吗？（我的系统是中文XP和Office xp），引用对话框如下： 

D:\Program Files\common Files\Microsoft Shared\DAO  文件夹下抓图如下： 

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

fankairong

QUOTE:

以下是引用Moneky在2007-8-19 10:58:15的发言：

请你确认一下是哪些对象好吗？（我的系统是中文XP和Office xp），引用对话框如下： 

D:\Program Files\common Files\Microsoft Shared\DAO  文件夹下抓图如下： 

我的是WINXP英文版,OFFICE2003中文版

C:\Program Files\Common Files\Microsoft Shared\DAO和楼主的一样

Moneky

QUOTE:

以下是引用fankairong在2007-8-19 11:58:32的发言：

我的是WINXP英文版,OFFICE2003中文版

C:\Program Files\Common Files\Microsoft Shared\DAO和楼主的一样

那你看看等否判断出是哪些对象不适合你的计算机，看看你的引用对话框我的只有第一个是这样，其他都是  标准

[此贴子已经被作者于2007-8-19 14:11:42编辑过]

laosanjie

Moneky 楼主是一位非常热心的高手！非常感谢您曾经对我的帮助！！！楼主奉献的好“东东”我都收藏学习了。顶一个，让更多的人分享！