For Each In～Next で複数のセルを指定したサンプルソース

---