公开源码---VBE环境下创建工具栏(常用代码快捷录入工具)

livedcn

也不知是win8系统原因还是office2013的版本问题，原来的英文缩进插件，安装完后“不出现”，使用不成，有这个加载宏很好了！一些常用但记不住的命令，可以快捷输入了，非常感谢大师们的创新精神分享精神。本人系统：32位win8.1 ，office2013，运行正常！

百度不到去谷歌

史上最好用VBA代码助手/随时随地收藏及插入代码/VBE无缝结合代码收藏工具
http://club.excelhome.net/thread-1142740-1-1.html
好的 我在做大杀器  稍后把这里的功能加入我的工具中

dqhtju

这个要花点时间学习

lolmuta

感动…这个超棒

2003可以跑，但是2010不能跑，
错误讯息如下
显示物件不支持此属性或方法 err code:438


一開始執行就出錯



按鈕ui有成功加載



錯誤的地方


錯誤訊息




我是64bit excel 2010 有人有跟我一样的吗?


我猜测是这个有问题
"Microsoft Visual Basic for Applications Extensibility 5.3"
应该是bug


http://social.msdn.microsoft.com/Forums/zh-TW/a7705b7f-1f97-485d-96f0-139033779bd4/microsoft-visual-basic-for-applications-extensibility-53-library-bug-in-office-2010-x64?forum=officegeneral
雖然有小小的缺失，
这个是我目前看过最简单，也纯绿色，操作最顺手的软体了

百度不到去谷歌

lolmuta 发表于 2014-8-4 19:39
感动…这个超棒

2003可以跑，但是2010不能跑，

试试我这个看
史上最好用VBA代码助手/随时随地收藏及插入代码/VBE无缝结合代码收藏工具
http://club.excelhome.net/thread-1142740-1-1.html

怀英慕者

测试了一下兄台的工具，非常好用！！！平时我自己整理了一些常用代码，也很想做成这种工具栏形式的，不知道兄台能否不吝赐教怎样才能制作这种工具栏呢？

百度不到去谷歌

怀英慕者 发表于 2014-8-11 00:29
测试了一下兄台的工具，非常好用！！！平时我自己整理了一些常用代码，也很想做成这种工具栏形式的，不知道 ...

试试我这个看
史上最好用VBA代码助手/随时随地收藏及插入代码/VBE无缝结合代码收藏工具
http://club.excelhome.net/thread-1142740-1-1.html
不需要你制作 直接用我的工具 你可以随意分类 然后就能按你的意愿生成对应的工具栏
当然我的源码也开放的 你可以自己看源码

EXCEL江湖

都是很好的工具，收藏学习!

Moneky

换了win8，原来的不能用了，这个插件不错。
自己改了一下只保留了代码缩进和空行删除。

感觉下面的代码可以修改下
Do Until Left(aLine, 1) <> " "
            aCodePane.CodeModule.ReplaceLine aLineNumber, Mid(aLine, 2)
            aLine = aCodePane.CodeModule.Lines(aLineNumber, 1)
Loop                        'Loop repeats until all spaces/indents removed
我直接改成了：
aCodePane.CodeModule.ReplaceLine aLineNumber,trim$(aLine)
感觉速度快一些了
============================================================

精简后的工具，没有创建新的工具栏，只是在内置的“编辑”工具栏上添加了两个按钮，在右键菜单中也添加了两个菜单项，方便快捷调用。现在的代码对齐代码有一些小缺陷，但总体还是够用了，如果自己写的代码基本上用不上。

yf_home

Moneky 发表于 2014-10-16 14:42
换了win8，原来的不能用了，这个插件不错。
自己改了一下只保留了代码缩进和空行删除。

感谢指点，我试试。