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

Question

无论如何将撤销功能编码到CommandButton上,类似于Excel自己的撤销功能？

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

Answer 1

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

Sub UndoLastAction()

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

End Sub

它只能撤消用户采取的最后一个操作,无法撤消VBA命令.

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

使用Excel VBA撤消 - JKP