如何在vba代码中使用goto语句?

VBA GoTo 语句帮助代码执行导航到过程中的特定行。简单来说,通过 goto 语句,VBA 跳转到您指定的特定行。例如,如果您指定跳转到第二行,则 go 将跳转到该行。

如何在代码中使用 VBA GoTo 语句

  1. 首先,您需要使用 goto 语句。
  2. 之后,您需要定义 VBA 从 goto 转到哪里。
  3. 接下来,创建标记以在过程中创建此位置。
  4. 最后,添加您要运行的代码行。
vba 转到代码中的语句
 Sub vba_goto() GoTo Last Range ("A1"). Select Last : Range ("A12"). Select End Sub

GoTo 重复代码

您还可以使用 go to 语句通过一组条件重复代码。

 Sub goto_repeat() Dim iMessage As String Question:    iMessage = InputBox("what's the day today?") If iMessage <> "tuesday" Then    MsgBox ("wrong answer, try again.") GoTo Question Else    MsgBox ("that's the right answer.") End If End Sub

当您运行上面的代码时,它会询问您当天的名称,如果您输入“星期二”以外的任何内容,它将重复该问题。如果你看一下代码,你会发现我们需要使用 goto 语句和if 语句

现在,当用户输入正确答案以外的任何内容时,goto 语句会强制 VBA 重复代码。 (但是每当您使用这种类型的代码时,您都必须非常小心,因为它可能会造成无限循环。

VBA 转到结束

您还可以使用 goto 语句退出子程序。

VBA-转到结束

在上面的代码中,我们在 end 语句之前使用了“last”标记,当 VBA 到达 GoTo 语句时,它使 VBA 跳转到过程末尾的“Last”。

GoTo 语句转到另一个子例程中的行

嗯,going to 语句对于使 VBA 从一个地方跳转到另一个地方来说非常方便,但不可能使其跳转到模块中的另一个过程。

添加评论

您的电子邮箱地址不会被公开。 必填项已用 * 标注