Loop QUESTION to end of data range...
Hi
numrows = Cells(Rows.Count, 1).End(xlUp).Row
will find the last used row number in column 1 (column A)
Range("A" & numrows).Select
will take you to that last cell used in column A.
If you want the first empty one after last used then
Range("A" & numrows + 1).Select
--
Regards
Roger Govier
"mniccole" wrote in message
ups.com...
HI:
Can you tell me how to loop to the end of the data range without this
being static?
Please
numrows = Range("A2", Range("A2").End(xlDown)).Rows.Count
Range("A2").EntireColumn.Select
For x = 1 To 3000
Thanks so much
Just need to go to the end value which will change everytime the
report
is ran by user
|