Ｅｘｃｅｌのセル選択範囲の指定について

質問

Ｅｘｃｅｌのセル選択範囲の指定について

d = Range("A65536").End(xlUp).Row

Range("A1:K" & d).Select

これでやると　Ａ１からk列のデータの最後の（データの入っている行）までを選択しますが
このk列というところを
n = ActiveSheet.Range("A1").End(xlToRight).Columnを使いKでなくデータのある列ｎを使った表現に変えたい。どうすればいいか。

回答No.4

imogasi · ベストアンサー

＃１で正解は出ていますが
Range("A1:K" & d).SelectはＡ１が固定などのときわかりやすいが拘るな。Ｒａｎｇｅ（Ｃｅｌｌｓ（・・）、Ｃｅｌｌｓ（・・））あるよということ。
ーー
ｄのやり方と統一するなら＃１の場合はＡ１からＥＮＤ＋→だが
最右列セルからＥＮＤ＋←
r = Range("iv2").End(xlToLeft).Column　もあるよ。
ーー
それにデータのありようで、使うべきかどうか変わるが
でこぼこしているようなときは
c = Range("a2").CurrentRegion.Columns.Count
も使える場合があるよ。
ＵｓｅｄＲａｎｇｅなどもあり、ＷＥＢで違いを調べて。

お礼

皆さんのおかげで解決しました。簡潔でていねいなご回答どうもありがとうございました。

回答No.3

mshr1962

下記で良いのでは？
d = Range("A65536").End(xlUp).Row
n = ActiveSheet.Range("A1").End(xlToRight).Column
Range("A1",Cells(d,n)).Select

お礼

皆さんのおかげで解決しました。簡潔でていねいなご回答どうもありがとうございました。

回答No.2

falst

Cellsを使ってはどうでしょうか？

d = Range("A65536").End(xlUp).Row

n = ActiveSheet.Range("A1").End(xlToRight).Column

Range(Cells(1, 1), Cells(d, n)).Select

お礼

皆さんのおかげで解決しました。簡潔でていねいなご回答どうもありがとうございました。

回答No.1

zap35

Range(Cells(1, 1), Cells(d, n)).Select
や
Range("A1", Cells(d, n)).Select
でどうでしょう

お礼

皆さんのおかげで解決しました。簡潔でていねいなご回答どうもありがとうございました。