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