vba - 将撤消构建到 Excel VBA 宏中

Question

Excel 宏在运行后似乎不允许使用“撤消”。有没有办法将undo功能烘焙到 Excel 中的 VBA 宏中？

Answer 1

Excel VBA 具有Application.OnUndo处理此问题的功能：

Public Sub DoSomething

    ... do stuff here

    Application.OnUndo "Undo something", "UnDoSomething"
End Sub

Public Sub UnDoSomething

    ... reverse the action here

End Sub

Answer 2

我的想法很简单，因为宏中的第一行将副本保存在备份目录中，然后关闭该工作簿并重新打开原始文件。如果您不喜欢宏运行的结果，请调出保存的工作簿。保持简单吧？

Answer 3

我总是在运行宏之前立即保存（至少在测试期间）然后，如果一切都变成梨形，我可以直接退出而不保存并重新打开它。

将其烘焙到实际的宏中，您基本上必须在列表中记录所有更改的旧状态（单元格内容、公式、格式等），然后有一个撤消宏以相反的顺序播放该列表。

例如，如果您的宏将单元格 C22 的内容从“3”更改为“7”并将格式从“常规”更改为“数字，2 位小数），您的列表将是：

C22 value  3
C22 format general

以相反的顺序播放（使用另一个宏）将还原更改。

您可以有一个完整的额外工作表来保存宏撤消信息，例如：

Step   Cell   Type    Value
----   ----   -----   -------
   1   C22    value         3
       C22    format  general
   2...

不幸的是，它不能很好地与“真正的”撤消集成，但我认为没有任何方法可以解决这个问题。