How to code "undo" event in Excel?

[sjh]

Hi,
In my Excel application, I need to iterate some rows and do some calculations. The calculation will be easier if I can sort the rows first and then compute. But after the calculation is done, I would like to "undo" the SORT event and return the worksheet in its original state.

I tried to record the undo event using Macro, but I couldn't. Is there a way? Thank you for your help!

 

[michaelbr55]

Application.Undo

 

[JohnAcc]

Another useful piece of code is:

Application.Repeat ' to undo an undo!

Rgds, John

 

[Chattin]

Just for general info

http://j-walk.com/ss/excel/tips/tip23.htm

HTH

 

[VBAjedi]

As JWalk points out, undoing VBA ain't easy. Application.Undo won't cut it in most situations.

For what you're tyring to do, you might consider the following approach (I've successfully used it several times in the past):

1) BEFORE you sort, write a temporary index (1 to whatever) in a blank column to the right of your data.
2) Do your sort and perform your calculation.
3) Sort by the index you just created, then clear that column

It's not too hard to code, and it works well.

Hope that helps!

VBAjedi