| |
▼Jaka さん：
コメントありがとうございます。
>Sub aaaa2()
>Dim Cel As Range
>Range("顧客リスト").Offset(, 1).Resize(, 1).Select
>For Each Cel In Range("顧客リスト").Offset(, 1).Resize(, 1)
> Cel.Select
> MsgBox Cel.Value
>Next
>End Sub
>
今、実際に使っているコードが上記の内容と
全く同じです＾＾
>おまけ、
>For Each Cel In Range("顧客リスト").Columns(2).cells
この、[おまけ]にすっごく、びっくりしましたｗ
Columns(2).Cells というコードは想像もしませんでした。
Cells そのものを理解していないから
その発想が出てこなかったのかと；；
で、実際に試して動きましたｗ
となると、For Each に必要なのは
[セル範囲の指定]ではなく
[複数個のセルの指定]・・・の様なニュアンス・・・？
なのでしょうか？？？
なんだか不思議な感じですが＾＾；
わからなければ
『For Each に Row/Column 禁止！』って、覚えろ！
くらいに言われちゃいそうですが、
どうにも気になっちゃいまして＾＾；
どちらにしても、
Column を使った For Each の使い方が
勉強になった事と
For Each に指定する物の理解の
糸口を頂き、ありがとうございました。
|
|
REV
- 10/6/23(水) 11:51 -
