如何以编程方式在Excel-Vba中编写“撤消”功能？

Question

有没有将撤销功能编码到CommandButton上，类似于Excel自己的撤销功能？

或者是一个能够调用Ctrl-Z快捷键的功能。

Answer 1

将命令按钮添加到工作表并为其分配以下宏：

Sub UndoLastAction()

    With Application
        .EnableEvents = False
        .Undo
        .EnableEvents = True
    End With

End Sub

它只能撤消用户采取的最后一个操作，并且无法撤消VBA命令。

编辑：如果您需要进一步的撤消功能，请参阅：

Undo With Excel VBA - JKP