☰

範囲コマンドを使用して範囲を選択する方法

tag-icon • tag-icon microsoft-excel vba
範囲コマンドを使用して範囲を選択する方法

選択する必要がある範囲があります。範囲の上限領域は A2 で、次のコマンドを使用して取得できます。

Cells(2, 1)

下限範囲は次のコマンドで取得できます -

Cells(Rows.Count, 1).End(xlUp).Row
Cells(5, Columns.Count).End(xlToLeft).Column

すべてのセル コマンドを範囲選択できるものに組み合わせるにはどうすればよいでしょうか?

私は試した

range=(cells(2,1)),(Cells(Rows.Count, 1).End(xlUp).Row),(Cells(5, Columns.Count).End(xlToLeft).Column).select

しかし、フォーマットエラーが発生します。

答え1

Cells(Rows.Count, 1).End(xlUp).Row整数を返すことを覚えておいてください

そして

Cells(5, Columns.Count).End(xlToLeft).Column整数を返します。

だから、必要なのですCells(integer,integer)。

あなたの場合は、現在、次のように書かれていますrange(A2),integer,integer.select。

select2 つの整数を使用する場合は、それを cells() でラップする必要があります。全体を range() でラップします。

 Set rng = Range(Cells(2, 1), Cells((Cells(Rows.Count, 1).End(xlUp).Row), (Cells(5, Columns.Count).End(xlToLeft).Column)))

より良い方法は

Sub test()
Dim rng As Range
Dim lastrow As Integer
lastrow = Cells(Rows.Count, 1).End(xlUp).Row
Dim lastcol As Integer
lastcol = Cells(5, Columns.Count).End(xlToLeft).Column

 Set rng = Range(Cells(2, 1), Cells(lastrow, lastcol))

End Sub

select今、あなたは範囲に理由を持たず、rng直接作業するだけです。

関連情報