Как программно кодировать функцию отмены в 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