当单元格值增加1时Excel自动保存

Question

我正在尝试创建一个宏，只要特定单元格中的值增加1，就会自动保存我的excel工作簿。

每当单元格发生变化时，我都会自动保存代码，我将在下面发布;

 Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Me.Range("A2")) Is Nothing Then
        ThisWorkbook.Save
    End If
End Sub

但是，我似乎无法使宏的代码适应仅在单元格中的值增加1时执行。即，单元格值为10，仅在单元格值为11时保存工作簿等等。

谢谢。

编辑： 问题已经解决了。如果有人正在寻找解决方案，请查看以下帖子：https://superuser.com/questions/1265717/excel-auto-save-macro

Answer 1

您可以使用 Worksheet_SelectionChange 获取单元格的旧值（Binils＆＃39; s answer），然后进行适当的比较（newval - oldval = 1）。