用VBA可以恢复，但不能通过Excel内置的功能自动实现。您可以使用VBA代码记录下运行宏程序前单元格或单元格区域原先的内容，在“撤销”命令中调用以恢复程序运行前的状态。

您可以使用Application对象的OnUndo方法作为宏程序结束前的最后一个代码，该方法允许您指定出现在“撤销”菜单项中的文本以及点击该文本后所运行的过程。如下面的代码所示：

Application.Onundo “撤销最后一个宏”，”恢复宏程序”

为说明上述方法，下面列出了一个完整的示例。示例的完整代码以及代码说明如下：

‘**************************************************

Type RangeCellInfo '自定义类型存储宏运行所作出的改变

CellContent As Variant

CellAddress As String

End TypePublic OrgWB As Workbook

Public OrgWS As Worksheet

Public OrgCells() As RangeCellInfo

‘**************************************************

Sub EditRange()

' 在所有被选取的单元格中插入X

Dim i As Integer, cl As Range

If TypeName(Selection) "Range" Then Exit Sub

Application.ScreenUpdating = False

ReDim OrgCells(Selection.Count)

Set OrgWB = Act