ねこになりたい

おふとんと朝の別れをするのが辛い人向けです。正論で殴らず見守ってあげてください。

Exit

概要

 

Do…Loopの繰り返し処理を抜ける場合

Exit Do
 

For Each, For Nextの処理を抜ける場合

Exit For
 

Subプロシージャを中断する場合

Exit Sub
 

Functionプロシージャを中断する場合

Exit Function
途中で処理を中断する場合に用いる。
一定の値に達して、後続処理が不要になった場合などに活用できる。
このデザインが可愛いって?お前の方が可愛いよ

この辺に画像入れれるよ

サンプル

1から5になったときに、後続の配列を中断させる。
Cellsの行と列はiの値に応じて変動するため、iが5になるまで斜めに出力されます(A1→B2→C3→D4)

Dim arr As Variant
Dim i As Integer

i = 1
For Each arr In Array("(´・ω・`)", "(´・ω・`)", "(´・ω・`)", "(´・ω・`)", "(´・ω・`)", "(´・ω・`)", "(´・ω・`)", "(´・ω・`)", "(´・ω・`)")
If i Mod 5 = 0 Then
Exit For
Else
Cells(i, i) = arr
End If

i = i + 1
Next

実行結果