VBA How to Loop via For Each

Method for looping through a determined Range
Loop stop determined in For Each parameter itselfs
(you can previosuly declare wkcell as Range variable if necessary)

For Each wkcell In Range("B2:B10")
wkcell.Value = wkcell.Row
Next wkcell

Method for looping through a whole column, until first empty cell
Loop stop determined by condition inside the loop

For Each wkcell In Range("A:A")
MsgBox wkcell.Value
If wkcell.Value = "" Then Exit For
Next wkcell