|
>つんさんのおっしゃられたように
> .column → 実際の列番号
>と変えるだけでOKでした。(下記参照のこと)
>=======================================================
>With Selection
> Range(Cells(.Row, 2), Cells(.Rows.Count + .Row - 1,10)).Interior.ColorIndex = 34
>End With
>=======================================================
えと、私は、
With Selection
Range(Cells(.Row, .Column + 1), Cells(.Rows.Count + .Row - 1, .Column + 10)).Interior.ColorIndex = 34
End With
のままで実行してOK!と言ったつもりなんですけど・・・
実際の列番号を指定してしまうと、列が固定されてしまって、
選択したセル範囲の2列目・・・というのは、実現出来ないんじゃないですか?
私がご質問の意味を読みとれてないだけかしらん?
もう一度お確かめくださいませ〜
|
|