Selecting rows
Hi JT,
Try:
Sub Tester03()
Dim FirstRow As Long
FirstRow = Cells.SpecialCells(xlCellTypeLastCell).Row + 1
Rows(FirstRow).Resize(Rows.Count - FirstRow + 1).Select
End Sub
Note that it is rarely necessary to make physical range selections.
---
Regards,
Norman
"JT" wrote in message
...
I want to select rows. However, the first row will always
be different, so I am trying to use a variable. Here is
the code that is not working:
Dim vlastrow As Integer
vlastrow = Cells.SpecialCells(xlCellTypeLastCell).Row
FIRSTROW = vlastrow + 1
Rows((FIRSTROW), "65000").EntireRow.Select
Any suggestions would be appreciated. Thanks for the help.
|