excel中的goto

goto

1.goto 行标签:vba跳转语句:过程内跳转并执行语句（示例3)

2.application.goto reference ：=“语句或者过程名”  一种application方法

执行引用的语句(示例1)或跳转到过程名指定的过程中（并不执行该过程）(示例2)

3.二者不能用混了，否则会出现语法错误

示例1

Sub mm()

    Application.Goto Reference:=Sheets("sheet1").Range("b5:e10"), scroll:=True

End Sub

选择指定区域并转到该工作表（不需要先用代码激活该表），scroll决定是否选择的区域滚动显示在

左上角

示例2

Sub RngGoto()

    Application.Goto Reference:="mm"

End Sub

光标跳转到指定的过程mm中（并不执行）

****************

示例3（来自excelhome网的网友)

本过程中跳转执行

Sub GotoStatementDemo()

Dim Number, MyString

    Number = 1    ' 设置变量初始值。

    ' 判断 Number 的值以决定要完成那一个程序区段（以“程序标签”来表式）。

    If Number = 1 Then GoTo Line1 Else GoTo Line2

    

Line1:

    MyString = "Number equals 1"

    GoTo LastLine    ' 完成最后一行。

Line2:

    ' 下列的语句根本不会被完成。

    MyString = "Number equals 2"

LastLine:

    Debug.Print MyString    ' 将“"Number equals 1"”显示在“立即”窗口。

End Sub