How to select a range of the second row to the last row

前端 未结 2 1831
误落风尘
误落风尘 2021-02-04 16:10

I am currently trying to figure out how to select a range from the second row to the last row, but more specifically between a range of columns. For instance I want to select Ra

相关标签:
2条回答
  • 2021-02-04 17:02

    Try this:

    Dim Lastrow As Integer
    Lastrow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
    
    Range("A2:L" & Lastrow).Select
    

    Let's pretend that the value of Lastrow is 50. When you use the following:

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

    Then it is selecting a range from A2 to L250.

    0 讨论(0)
  • 2021-02-04 17:13
    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
    

    To use with ActiveSheet:

    Call SelectAllCellsInSheet(ActiveSheet.Name)
    
    0 讨论(0)
提交回复
热议问题