Dear sir,with best regards,i have in my worksheet more than (10000) used rows,how can i reach the last row which is full of data directly ( by a code )
Many thanks in advance.

Assuming Column A represents all rows.........go to bottom of sheet
then come up to last filled cell.

Sub select_last()
Dim rng As Range
Set rng = Cells(Rows.Count, 1).End(xlUp)
msgbox rng.Address
End Sub


Gord

On Fri, 30 Mar 2012 10:43:05 +0000, tofimoon4
wrote:


Dear sir,with best regards,i have in my worksheet more than (10000) used
rows,how can i reach the last row which is full of data directly ( by a
code )
Many thanks in advance.

Dear sir,with my thanks to your solution,i need a code that will guide me to the last used row directly not point only.
My regards.

rng.Select


Gord


On Sun, 1 Apr 2012 17:17:25 +0000, tofimoon4
wrote:


'Gord Dibben[_2_ Wrote:
;1600287']Assuming Column A represents all rows.........go to bottom of
sheet
then come up to last filled cell.

Sub select_last()
Dim rng As Range
Set rng = Cells(Rows.Count, 1).End(xlUp)
msgbox rng.Address
End Sub


Gord

On Fri, 30 Mar 2012 10:43:05 +0000, tofimoon4
wrote:
-

Dear sir,with best regards,i have in my worksheet more than (10000)
used
rows,how can i reach the last row which is full of data directly ( by
a
code )
Many thanks in advance.-

Dear sir,with my thanks to your solution,i need a code that will guide
me to the last used row directly not point only.
My regards.