Terminate Macro At Last Cell

[timstring]

I need for my Macro to stop when it reaches the last cell. I know the last cell coordinates. I need something like:

  Loop Until ActiveCell.Offset(1, LastCol - 1) = **coordinates of last cell**

How would I accomplish this?

ty in advance

 

[par60056]

It would help if we could see the rest of the code.

Personally, My macros almost never activate a cell. So inside my loop I would be referencing cells(CurrRow,CurrCol)

If you are activating cells as you go, you can check ActiveCell.row <= lastRow

 

[DeBeuz]

Hi,

You could save the coordinates of the last cell and compare it to the looping cell:
LastCellAddr = cells(x,y).address 'x,y are the coordinates of the last cell
Loop Until ActiveCell.Offset(1, LastCol - 1).address = LastCellAddr

.Address returns the cell's address similar to "$c$2"

Succes,

Paul