发布一个免费的加载宏工具（开放部分源码）-ExcelDIY

leolee82 · 发表于 2023-4-4 20:25

loquat 发表于 2023-3-12 23:13
excelpx上的代码下载不了哦

刚上传了最新的，顶楼百度网盘。ExDIY.DLL就是我另一个帖子说的2万行的代码
没有更新日志，看哪里不爽就更新哪里

loquat · 发表于 2023-4-4 23:01

leolee82 发表于 2023-4-4 20:25
刚上传了最新的，顶楼百度网盘。ExDIY.DLL就是我另一个帖子说的2万行的代码
没有更新日志，看哪里不爽就 ...

感兴趣就是你那个DIY.DLL的代码。
这种框架，能在现成的基础上改，是意见开心的事

loquat · 发表于 2023-4-4 23:06

只支持32位office

leolee82 · 发表于 2023-4-5 00:59

loquat 发表于 2023-4-4 23:01
感兴趣就是你那个DIY.DLL的代码。
这种框架，能在现成的基础上改，是意见开心的事

核心的东西是基于2010年写的一个工具栏菜单生成工具,开放代码的，应该也没设密码，你可以参考一下。

方便快捷的工具栏生成工具 - Excel VBA开发 - Excel精英培训网 - Powered by Discuz! (excelpx.com)

工具栏.rar (23.94 KB, 下载次数: 49)

后来就封装到EXDIY.DLL中，主要做了以下修改：
把快捷键的功能由OnKey替换成了keyboard Hook
右键菜单加到默认的右键菜单中显得太长了，又可能会受到其他工具的影响，就改为Ctrl+鼠标或者双击CAP LOCK键单独调出
增加了Redo和Undo功能
封装一些写VBA常用的功能和函数
去年发现用CallWindowProc可以实现通用的回调函数，把原来用接口类实现的回调都改成了回调函数
后来又觉得回调参数多了用数组不爽，自己用C++写了个VBHelper.dll，实现了1-9个参数的回调。顺便搞了个调用stl::sort的接口

VB6做的dll无法支持64位Office，不爽很久了，不能调试鼠标和键盘钩子。现在连Private WithEvents xl As Excel.Application都不支持了。

loquat · 发表于 2023-4-5 11:12

leolee82 发表于 2023-4-5 00:59
核心的东西是基于2010年写的一个工具栏菜单生成工具,开放代码的，应该也没设密码，你可以参考一下。
...

用twinBasic吧

loquat · 发表于 2023-4-5 11:26

后期绑定的对象，自己怼ConnectionPoint可以搞事件。
老外有封装专门的后期绑定对象的事件组件EventCol，不过是VB6的，迁移到TwinBasic不难。

loquat · 发表于 2023-4-5 11:29

callback要不用DispCallFunc实现算了，虽然效率低一点

leolee82 · 发表于 2023-4-5 22:00

loquat 发表于 2023-4-5 11:12
用twinBasic吧

twinBasic支持64位是收费的。
用VB6还写过另外一个2万多行的小软件，VB的代码重用太难了：面向对象支持不行，没函数重载，连对象的赋值都搞了不一样的set。以后用C++(Qt用起来还是很舒服的)或C#了，最近也准备开始看JS

另外VBA中的Callback用CallWindowProc是完全可以的，可以参考这个帖子。64位时注意别用uMsg参数就行
https://club.excelhome.net/threa ... tml?_dsign=c2983c24

leolee82 · 发表于 2023-4-6 18:11

修正了一些bug
增加了ESC关闭VBA创建的窗体的功能
替换DLL文件重新注册即可

ExcelDIY.rar (377.11 KB, 下载次数: 78)

loquat · 发表于 2023-4-6 23:07

leolee82 发表于 2023-4-5 22:00
twinBasic支持64位是收费的。
用VB6还写过另外一个2万多行的小软件，VB的代码重用太难了：面向对象支持 ...

目前64只是一个弹窗，很容易解决。
只是今年的一些高级功能可能比较费劲。

		自动登录	找回密码
密码			免费注册