Last Cell on a Worksheet
 

I would like to find the last cell used on a worksheet and place it in
variable. If the last cell is L257, I would like it stored as L25
rather than as an integer. I have routines to get the last row and las
column. I can then display the last cell as $L$257 with the following:


Code
-------------------
MsgBox Cells(LastRow, LastColumn).Addres
-------------------


I can then place that value in a string with the following:


Code
-------------------
Dim LastCell As String
LastCell = Cells(LrMaster, LcMaster).Addres
-------------------


The following code will give you an idea of how I want to use it, bu
it is not quite right. How would I specify a range of A2 throug
LastOne similar to what I have below? ("A2:LastOne") will not work.


Code
-------------------
Dim Bcell As Range
For Each Bcell In Worksheets("Master").Range("A2:LastOne")
'routine
Next Bcel
-------------------


Thank

--
David
-----------------------------------------------------------------------
DavidW's Profile: http://www.excelforum.com/member.php...fo&userid=3263
View this thread: http://www.excelforum.com/showthread.php?threadid=57425

Last Cell on a Worksheet
 

Hi DavidW,

Try:
For Each Bcell In Worksheets("Master").Range("A2", LastOne)

That should do the trick.

Good luck!


Leonida

--
leonida
-----------------------------------------------------------------------
leonidas's Profile: http://www.excelforum.com/member.php...fo&userid=3537
View this thread: http://www.excelforum.com/showthread.php?threadid=57425

Last Cell on a Worksheet
 

Leonidas,

Thank you. That works.

Davi

--
David
-----------------------------------------------------------------------
DavidW's Profile: http://www.excelforum.com/member.php...fo&userid=3263
View this thread: http://www.excelforum.com/showthread.php?threadid=57425