无法在中断模式下执行宏

Question

我正在尝试编写一个简单的宏来向单元格的当前值添加1：

Sub add()
    MsgBox Selection.Value
    Selection.Value = Selection.Value + 1
End Sub

单击（数字）单元格并尝试运行宏时收到以下错误消息：

Cannot Execute in Break Mode

我错过了什么？

Answer 1

您已经在执行宏并以某种方式停止执行（例如由于未处理的错误或者因为您在执行期间按 Ctrl - Break ）。在此状态下，您无法执行另一个宏。

在Visual Basic编辑器中，您需要按“停止”按钮：

然后你可以运行宏。

如果您想了解当前执行的停止位置，请右键单击代码并选择显示下一个语句。如果您按 F8 ，则可以单步执行代码。 F5 继续执行。

Answer 2

您应该检查单元格中的值是否为数字。实施例

Sub add()
    If IsNumeric(Selection.Value) Then
        Selection.Value = Selection.Value + 1
    Else
        MsgBox ("Not a value selected")
    End If
End Sub

Answer 3

Sub Lower()
    Range ("e3"), Value = Range("e3"), Value - 1
End Sub

Sub Higher()
    Range ("e3"), Value = Range("e3"), Value + 1
End Sub