把我们现有的宏整理成工具条

学习vba久了，也许有很多不同的代码，想用时慢慢找有点费事，这个可以将其整理成工具条以方便使用，每个宏名显示长度为6字符。已经封装为dll了，不想用dos注册的直接复制到C:\windows\system32 下好啦，（总不会系统不再C吧）。  调用此dll的代码如下，但愿您用的省心。

Sub VBA工具条()
Dim AppDll As Object
Set AppDll = CreateObject("sqh3.aaa3")
AppDll.列出宏
Set AppDll = Nothing
End Sub

[ 本帖最后由 sqhsqhli 于 2011-1-24 10:37 编辑 ]

抢个沙发坐坐，赞一个！

如果能贴出各个宏的代码，就更好了。

不过也谢谢楼主。