1. 程式人生 > >excel中的goto

excel中的goto

excel vba 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