Eric,

One way:-

Sub cleanundo()
Range("A1").Copy Range("A1")
End Sub

you could put the same line of code in an event module such as worksheet
change to clear the undo stack automatically.

Mike

"Eric" wrote:

Does anyone have any suggestions on how to clean the memory for undo?
Thanks for any suggestions
Eric