は、ヘッダー名を使用した複数列の選択 - エクセルVBA

Question

は私が唯一のヘッダー名を使用して複数の列を選択する必要がある要件を持っており、これはそのための私のコードで、

colmz = WorksheetFunction.Match("Sheet1", Sheets("Age").Rows(1), 0) 
Nrowz = ActiveSheet.Cells(Rows.Count, colmz).End(xlUp).Row 
Sheets("sheet1").Range(Cells(1, colmz), Cells(Nrowz, colmz)).Select 

colm = WorksheetFunction.Match("Sheet1", Sheets("Gender").Rows(1), 0) 
Sheets("sheet1").Range(Cells(1, colm), Cells(Nrowz, colm)).Select 

を、私はそれらを個別に選択することができました一緒にではありません。レンジ関数内でそれらをどのように使用し、両方の列を一緒に選択するのですか？親切に私にあなたの提案をください。前もって感謝します。

Answer 1

より良い練習がある場合は親切に、私に知らせて、私のため

Union(Range(Cells(1, colmz), Cells(Nrowz, colmz)), Range(Cells(1, colm), Cells(Nrowz, colm))).Select 

を仕事をしました。わかりやすくするために、2つの領域の範囲を.selectに作成しました。この方法を使用すると、使用するシートも指定できます。あなたは2を使用する場合にのみ、その一つ一つを選択することができます

Dim age_range, gender_range As Range 

colmz = WorksheetFunction.Match("Sheet1", Sheets("Age").Rows(1), 0) 
Nrowz = ActiveSheet.Cells(Rows.Count, colmz).End(xlUp).Row 
colm = WorksheetFunction.Match("Sheet1", Sheets("Gender").Rows(1), 0) 

Set age_range = Sheets("sheet1").Range(Cells(1, colmz), Cells(Nrowz, colmz)) 
Set gender_range = Sheets("sheet1").Range(Cells(1, colm), Cells(Nrowz, colm)) 

Sheets("sheet1").Range(Union(age_range, gender_range).Address).Select 

Answer 2

私は連合の機能を試してみましたが、それはあなたが二つの範囲のUNIONを選択します。この