|
▼草加Jacky さん:
>よーくかんがえよぉ さん、お返事ありがとうございます。
>もう2日に渡って考えています。ヘルプも、関連本も、WWWサイトもかなり見たつもりです。初心者なので申し訳ありません。
>
>キーボードマクロでやってみると、残念ながら
>
> ActiveCell.Offset(1, 2).Range("A1").Select
> Range(Selection, Selection.End(xlDown)).Select
> ActiveCell.Offset(0, -2).Range("A1:C32").Select
>
>となってしまい、せっかく2行目で xlDown を使っているのに3行目に絶対指定が来てしまうため、汎用的なマクロにならないのです。ここを何とかしたいのですが…。
あらら2日もがんばったの〜
もっと早くきたらよかったのに
ヘルプのRangeに載ってる例を参考にするとよかったのよ
Sub Macro1()
Range(Selection.Range("A2").Address(0, 0) + ":" + _
Selection.Range("C2").End(xlDown).Address(0, 0)).Select
End Sub
|
|