For Each で処理する順番
範囲を指定し、その中のセルを対象として順に処理をする。 例えば、こんな感じで。 Sub test_1() Dim r As Range For Each r In Range("A1:H8") r.Interior.Color = 192 Application.Wait [Now()+"00:00:00.03"] Next End Sub 確認したところ、このように、処理は行方向に進むようだ。 （＝右に向かって処理が進み、端まで…
