Columnsプロパティで指定した範囲の扱いについて、お尋ねします。
ある指定した範囲(例.三行一列)について、ループ処理を行います。
Sub Sample_01() Dim myRng As Range Dim r As Range Set myRng = Range("A1:A3") For Each r In myRng Debug.Print r.Value Next End Sub
ここで、処理範囲の表現を「三行三列の中の一列目」に改めたところ、
実行時エラー '13':
方が一致しません。
が生じました。
Sub Sample_02() Dim myRng As Range Dim r As Range Set myRng = Range("A1:C3") For Each r In myRng.Columns(1) Debug.Print r.Value Next End Sub
上記のような用法においては、どのような記述が正しいでしょうか。
ご教示のほど、宜しくお願します。
※参考までに、↓なら上手くいくのですが、出来れば「一旦選択する」のは避けたいです。
VBA
1 2Sub Sample_03() 3 4 Dim myRng As Range 5 Dim r As Range 6 7 Set myRng = Range("A1:C3") 8 myRng.Columns(1).Select 9 For Each r In Selection 10 Debug.Print r.Value 11 Next 12 13End Sub
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2017/11/10 13:04