simple VBA code to reset last cell???

[MikeJP]

Hello All,

I to reset the last cell in a worksheet after clearing all of the information in it via VBA , with out deleting and recreating the worksheet. ie last cell should be A1.

Thanks

Mike Piles

 

[phantom1975]

Are you looking for something like this:

Range("A1").Value = ""

 

[Juan Pablo González]

Save the workbook, or, use something like this in VBA

ActiveSheet.UsedRange

 

[TryingToLearn]

http://www.mrexcel.com/board2/viewtopic.php?t=76181&highlight=reset+last+cell

 

[bromy2004]

i Know its very late for a reply.
bu i had the same problem and i found/modified this code.

Sub ResetLastCell ()
Dim x as Long
Dim y as Long
x = ActiveSheet.UsedRange.Rows.Count
y = ActiveSheet.UsedRange.Columns.Count
End Sub

i cant say i know how it works.
But it resets the last used cell without needing to save.

-Bromy

 

[billritz]

Juan Pablo above has it right; any reference to usedrange seems to do it. Handy if you've deleted thousands of rows. If you're in the worksheet you can put "? activesheet.usedrange.address" (without quotes) in the immediate window.