Exitは実行中のループ処理やプロシージャを終了する場合に使用します。
Exit For For文の終了
Exit Do Do文の終了
Exit Sub プロシージャの終了
Exit Function 関数の終了
Exitを使用して処理を終了させる場合、If文を併用して中断させます。
Sub Sample()
Dim i As Integer
i = 1
Do While i < 100
i = i + 1
If i = 10 Then Exit Do
Loop
Msgbox i '---iは10となる
End Sub