Excel 运行时错误答案

【问题标题】：Excel Run Time ErrorExcel 运行时错误
【发布时间】：2015-02-10 02:06:22
【问题描述】：

"运行时错误'3' 不使用 GoSub 即可返回”

以上是我尝试在 excel 中运行程序时出现的错误代码。

Sub Button3_Click()
    If Range("G1").Value = "hot" Then
        Call hotjuly17_macro
    ElseIf Range("G1").Value = "cold" Then
        Call coldjuly17_macro
    Else
        Return
    End If
End Sub

我选择了“调试”选项，并显示“返回”突出显示为错误。我想要做的是添加另一个复选框来隐藏/取消隐藏我在 excel 中选择的行。我已经用这个电子表格上的一个复选框让它工作了，但是第二个复选框由于某种原因不起作用。除了隐藏/取消隐藏哪些行以及放置值的位置之外，该代码几乎相同。（例如，我正在尝试修复的此复选框的热值和冷值在 G1 中，但对于工作复选框，值在 E1 中。只是想我会提到）

我不明白问题可能是什么，如果有人需要查看，我很乐意发布任何代码。

【问题讨论】：

Return 在 VBA 中不是一个东西。 If 中的最后一个子句不是必需的 - 它基本上是“什么都不做”Else（或者如果 Return 没有导致它出错）
那应该是什么样子？（我删除了返回，但是您指的是哪个“如果”？）请您输入它吗？

标签： excel checkbox return

【解决方案1】：

Sub Button3_Click()
    If Range("G1").Value = "hot" Then
        Call hotjuly17_macro
    ElseIf Range("G1").Value = "cold" Then
        Call coldjuly17_macro
    End If
End Sub

【讨论】：

添加一个简短的解释说明为什么这段代码会更好。