So verwenden Sie den Bereichsbefehl zum Auswählen eines Bereichs

Question

Ich habe einen Bereich, den ich auswählen muss. Der obere Bereich des Bereichs ist A2, den ich mit dem folgenden Befehl abrufen kann -

Cells(2, 1)

Den unteren Bereich kann ich mit den folgenden Befehlen erreichen -

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

Wie kann ich alle meine Zellenbefehle zu etwas kombinieren, das dieser Bereich auswählt?

Ich habe es versucht

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

aber ich bekomme einen Formatfehler.

Answer 1

Remember Cells(Rows.Count, 1).End(xlUp).Rowgibt eine Ganzzahl zurück

Und

Cells(5, Columns.Count).End(xlToLeft).Columngibt eine Ganzzahl zurück.

Also brauchst du Cells(integer,integer).

So wie Ihr Brief jetzt steht, lautet er range(A2),integer,integer.select:

Sie verwenden es nicht. selectWenn Sie zwei Ganzzahlen verwenden, müssen Sie es in cells() einschließen. Und das Ganze in range().

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

Ein besserer Weg hierfür wäre

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

Jetzt haben Sie keinen Grund mehr, selectIhr Sortiment zu erweitern – arbeiten Sie einfach rngdirekt mit.