GoTo ステートメント
プロシージャ内の指定行に無条件で分岐します。
構文
GoTo行
必須の 行引数 には、任意の 行ラベル または 行番号を指定できます。
解説
GoTo で分岐できるのは、同じプロシージャ内の行に限られます。
注:
GoTo ステートメントが多すぎる場合、コードの読み込みやデバッグが困難になります。 可能な場所では、構造化されたコントロール ステートメント (Do...Loop、For...Next、If...Then...Else、Select Case) を使用します。
例
この例では、GoTo ステートメントを使用して、プロシージャ内の行ラベルに分岐しています。
Sub GotoStatementDemo()
Dim Number, MyString
Number = 1 ' Initialize variable.
' Evaluate Number and branch to appropriate label.
If Number = 1 Then GoTo Line1 Else GoTo Line2
Line1:
MyString = "Number equals 1"
GoTo LastLine ' Go to LastLine.
Line2:
' The following statement never gets executed.
MyString = "Number equals 2"
LastLine:
Debug.Print MyString ' Print "Number equals 1" in
' the Immediate window.
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。