【EXCEL VBA】定数で与えられたセルを使いセル範囲を選択する方法

【EXCEL VBA】定数で与えられたセルを使いセル範囲を選択する方法

VBA初心者です。よろしくお願いします。

実行したい処理は決めたのですが、Excelのレイアウトが未定です。
そこで、レイアウト変更を考慮し、処理対象セルを定数で与えています。

例えば、
Range("B2:B8").Select
は、
Const IchI As String = "B2"
Range(Range(IchI), Range(IchI).Offset(6, 0)).Select ・・・(1)
としています。（これ自体おかしいのかもしれません。。。）


しかし複数のセル範囲
例えば、
Range("B2:B8,F2:F8").Select
の場合、どうしたらいいのかわかりません。
(1)自体おかしいのかもしれません。

　　良い方法があれば教えてください。
よろしくお願いします。

No.2 ベストアンサー 回答者： DOUGLAS_ 回答日時： 2010/09/01 19:31

　セル の アドレス 文字列を「定数」で宣言しても、結局「Range()」の引数として指定する訳ですから、端から Range オブジェクト として宣言する方が使い回しも簡単かと存じますが。

。。

Const IchI As String = "B2"
With Range(IchI)
　Union(.Resize(7), .Offset(, 4).Resize(7)).Select
End With

でしょうか。。。

この回答へのお礼

ありがとうございます。

>端から Range オブジェクト として宣言する方が使い回しも簡単
そうですね。
経験が浅く頭がまわりませんでした。

ありがとうございます。

お礼日時：2010/09/01 20:11

No.1 回答者： kmetu 回答日時： 2010/09/01 18:55

Const IchI As String = "B2"

Const IchI2 As String = "F2"

Union(Range(Range(IchI), Range(IchI).Offset(6, 0)), Range(Range(IchI2), Range(IchI2).Offset(6, 0))).Select


としてください。

この回答へのお礼

unionですね。
助かりました。ありがとうございます。

お礼日時：2010/09/01 20:10