给你的VBA代码增加Undo功能，可以自定义恢复步骤数量

wangjian6931 · 发表于 2015-4-4 08:33

长久以来，很多人都一直想给自己的VBA代码增加Undo功能，这都源于Excel中一旦用VBA修改了工作表中的数据后就会让系统自带的“撤消”功能失效。

以下这个帖子是liucqa学导分享及总结的前人的一些成果。里面提到的Jan Karel Pieterse作品可以多次Undo我没有试出来，也许是我没有耐心吧，反正不是我要的效果
http://club.excelhome.net/thread-1049395-1-1.html

我一直没有找到可以多次撤销和重复的代码，因为大家都知道要达到这个功能代码还是比较复杂的，所以很少有人愿意去写这样的代码，也许有人写出来了，可是一直没有人愿意分享出来，为了学习类就自己动手做了一个这样的功能。现在已经很少用Excel了，就索性将这个模块分享给大家，也算造福人类了吧，呵呵~

特点：
1.可以自定义撤销和重复的次数
2.可以撤销和重复与数据相关的内容，包括公式。（单元格属性、图形等其他内容无法撤销和重复）

已知BUG：
1.整行和整列的删除不能撤销
2.代码中出现类似ActiveSheet.Cells.ClearContents这样的删除全部数据的代码时会内存溢出。

问题：
已知BUG为什么不修复？没有时间了，说白了也就是懒了，要是谁肯支助我，说不定我就肯修复这个BUG了。因为代码公开，有用得着的高手完全有能力自己可以修改代码了。

UndoHandler撤消重做VBA代码.zip (64.87 KB, 下载次数: 480)

因为各种原因ExcelHome来得少了，不过对这里还是很留恋的，不知道这样一个贴子能否申请精华，也许能弥补在ExcelHome混了那么多年的遗憾。

jpj123 · 发表于 2015-4-4 08:44

想法独特，支持一下。

wangjian6931 · 发表于 2015-4-4 11:08

谢谢回复，看来喜欢这个功能用得着的确实不多。

wangjian6931 · 发表于 2015-4-5 19:23

连个支持的人都没有，可惜了

mikewolf2k · 发表于 2015-5-22 10:20

这个功能很赞，下来学习下原理。多谢楼主！

东亚五金 · 发表于 2015-5-22 11:03

能够应用到所有的工作簿中就好了

VBA万岁 · 发表于 2015-5-25 13:58

Mark收藏并强烈支持。
期待改进（如格式设置、整行整列删除的返回......）。

UndoHandler撤消重做VBA代码.zip (641.89 KB, 下载次数: 186)

patdelphi · 发表于 2018-1-9 14:27

非常感谢~~~~~~~

mpili2015 · 发表于 2018-7-31 16:56

研究下正好需要~

readmi · 发表于 2019-1-19 15:40

可以在编辑时打开宏录制,然后进行处理,去掉鼠标点击等无用的内容

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

[分享] 给你的VBA代码增加Undo功能，可以自定义恢复步骤数量

评分

评分

最新热点 /1