How to programmatically code an ‘undo’ function in Excel-Vba? [duplicate]

by

Add the command button to the worksheet and assign the following macro to it:

Sub UndoLastAction()

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

End Sub

It can only undo the last action taken by the user and cannot undo VBA commands.

EDIT: If you need further undo capabilities see:

Undo With Excel VBA – JKP

More Related Contents:

  1. How to add a custom Ribbon tab using VBA?
  2. filter out multiple criteria using excel vba
  3. Closing Excel Application using VBA
  4. How to add parameters to an external data query in Excel which can’t be displayed graphically?
  5. Cannot VBA write data to cells in Excel 2007/2010 within a function
  6. VBA equivalent to Excel’s mod function
  7. Excel VBA to match and line up rows
  8. Excel: the Incredible Shrinking and Expanding Controls [closed]
  9. Excel Date Conversion from yyyymmdd to mm/dd/yyyy
  10. How to check whether certain sheets exist or not in Excel-VBA? [duplicate]
  11. Delete all data rows from an Excel table (apart from the first)
  12. How to do a “Save As” in vba code, saving my current Excel workbook with datestamp?
  13. Print function selecting wrong Type of Change option excel vba
  14. Format Cell Contents
  15. Excel formula checklist in employees
  16. What is the difference between .text, .value, and .value2?
  17. VBA rounding problem
  18. 2 ways for “ClearContents” on VBA Excel, but 1 work fine. Why? [duplicate]
  19. Excel 2013 VBA Clear All Filters macro
  20. Sum function in VBA
  21. Excel error 1004 “Unable to get …. property of WorksheetFunction class” appearing inconsistently
  22. How can I install/use “Scripting.FileSystemObject” in Excel 2010 for MAC?
  23. How to save Excel Workbook to Desktop regardless of user?
  24. How to add an attachment to an email using VBA in Excel
  25. Get Timezone Information in VBA (Excel)
  26. How to change Format of a Cell to Text using VBA
  27. Excel VBA Run-time error ’13’ Type mismatch
  28. ThisWorkbook.FullName returns a URL after syncing with OneDrive. I want the file path on disk
  29. Excel VBA wildcard search
  30. VBA: Modify chart data range

Leave a Comment