I can't undo after using a macro that does paste special formulas. Following
is the macro:

Selection.PasteSpecial Paste:=xlFormulas, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End

Undo does work with macros.
You have to write specific code to undo the macro.
One could give the user an option to undo -
say a button to click - then run the undo code.

Jim Cone
San Francisco, USA.

"DPW1" wrote in message
...
I can't undo after using a macro that does paste special formulas. Following
is the macro:

Selection.PasteSpecial Paste:=xlFormulas, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End

AFAIK Undo only applies to actions taken *by the user*. It cannot be used
to undo Visual Basic commands (or macros, which are the same thing).

Similar to what it says in the VB Help entry for the Undo method.

--
George Nicholson

Remove 'Junk' from return address.


"DPW1" wrote in message
...
I can't undo after using a macro that does paste special formulas.
Following
is the macro:

Selection.PasteSpecial Paste:=xlFormulas, Operation:=xlNone, SkipBlanks:=
_
False, Transpose:=False
End

Left out an important word.
Text should read...

"Undo does not work with macros"

Jim Cone


"Jim Cone" wrote in message ...
Undo does work with macros.
You have to write specific code to undo the macro.
One could give the user an option to undo -
say a button to click - then run the undo code.

Jim Cone
San Francisco, USA.

"DPW1" wrote in message
...
I can't undo after using a macro that does paste special formulas. Following
is the macro:
Selection.PasteSpecial Paste:=xlFormulas, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End

This is default nature of macros......they cannot be undone.

You would have to store the original data then retrieve it using another
"undo" macro.

See John Walkenbach's site for an undo macro.

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


Gord Dibben Excel MVP

On Tue, 5 Jul 2005 10:12:02 -0700, "DPW1"
wrote:

I can't undo after using a macro that does paste special formulas. Following
is the macro:

Selection.PasteSpecial Paste:=xlFormulas, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End