CurrentRegion

≪for ～ next と合わせてよく使う≫

1：アクティブ セル領域の選択（ショートカット：[shift]ｷｰ + [*]ｷｰ）

例）[A1]セルのアクティブ セル範囲を選択

Range("A1").CurrentRegion.Select



2：アクティブ セル範囲の中で行数を選択

例）[A1]セルのアクティブ セル範囲で行数を選択

Range("A1").CurrentRegion.Rows.Count







3：アクティブ セル領域の中で列数を選択

例）[A1]セルのアクティブ セル領域で列数を選択

Range("A1").CurrentRegion.Columns.Count