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
excel中的goto