excel - 如何选择第二行到最后一行的范围

Question

我目前正在尝试弄清楚如何选择从第二行到最后一行的范围，但更具体地说是在一系列列之间。例如，我想选择 Range( A2:L2) 到电子表格中的最后一行数据。

我试过了，

Dim Lastrow As Integer
Lastrow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row

Range("A2:L2" & Lastrow).Select

但这A2:L2会一直选择到电子表格的底部。我检查了是否Lastrow不正确，但我将其打印到了一个单元格并显示了正确的行数。

Answer 1

试试这个：

Dim Lastrow As Integer
Lastrow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row

Range("A2:L" & Lastrow).Select

假设 的值为Lastrow50。当您使用以下内容时：

Range("A2:L2" & Lastrow).Select

然后它正在选择从 A2 到 L250 的范围。

Answer 2

Sub SelectAllCellsInSheet(SheetName As String)
    lastCol = Sheets(SheetName).Range("a1").End(xlToRight).Column
    Lastrow = Sheets(SheetName).Cells(1, 1).End(xlDown).Row
    Sheets(SheetName).Range("A2", Sheets(SheetName).Cells(Lastrow, lastCol)).Select
End Sub

与 ActiveSheet 一起使用：

Call SelectAllCellsInSheet(ActiveSheet.Name)