语法

VBA 中，在程序运行时，使用 GoTo 结构，跳转到指定标签处运行，从而不执行 GoTo 语句和指定标签之间的代码。

在实际的 VBA 开发中，Goto 结构多用于处理错误的情形，即发生错误时，跳转到处理错误的代码处。

GoTo 结构由 GoTo 语句和标签语句组成。基本语法如下：

GoTo [标签]

'被跳过的代码
...
[标签]:
'被执行的代码

跳转的位置由 Goto 关键词后的 [标签] 告诉程序，VBA 会在代码中查找对应的 [标签]: 关键词，从标签下一行继续执行程序。

需要注意的是，跳转处的标签，后接半角冒号 ( : ) 。

示例

下面的例子说明 GoTo 结构的基本用法。使用 VBA 作除法，如果除数是零，则跳转到程序末尾，提示除数不符合规范。

Sub MyCode()

    Dim num1 As Double
    Dim num2 As Double
    Dim result As Double
    
    num1 = 100
    num2 = 0
    
    If num2 = 0 Then GoTo error
    
    result = num1 / num2
    
    Exit Sub
    
error:
    MsgBox "除数不能为零"

End Sub

可以看到，例子中 num2 是除数，程序判断 num2 是否为零，如果是，则跳转到 Error 标签处，除法部分不会被执行。

转载：https://www.lanrenvba.com/c/vba-start/code-structure/goto-structure/goto-example