Undo/Redo Greyed Out

[Potsy]

For some reason I have lost the ability to undo/redo says "can't undo/
redo" in excel if you are to type in cell both arrows show blue then
when select out of it it goes grey again. I have tried opening other
workbooks and same thing happens obviously a problem with settings
globally. I have looked in Tools > Options but cannot see anything to
check. It seems to be a problem that has happened recently as been
okay in the past. Any ideas????

 

[JE McGimpsey]

Are you running event macros?

Most macros will reset the Undo stack.

 

[Dave Peterson]

A common side effect of most macros is that the Undo/Redo stack is lost.

This includes macro that you run by clicking on a button and event macros that
fire in the background.

It sounds like you have some sort of _selectionchange event firing since the
edit|undo stack gets cleared when you change selection.

 

[Potsy]

A common side effect of most macros is that the Undo/Redo stack is lost.

This includes macro that you run by clicking on a button and event macros that
fire in the background.

It sounds like you have some sort of _selectionchange event firing since the
edit|undo stack gets cleared when you change selection.

Dave

Have following code:

Option Explicit
Private Sub Worksheet_Calculate()
Dim oPic As Picture
With Range("A32")
For Each oPic In Me.Pictures
Select Case LCase(oPic.Name)
Case LCase("PictureNICEIC"), LCase("PictureEst"),
LCase("PictureLogo")
'do nothing
Case Is = LCase(.Text)
oPic.Visible = True
oPic.Top = .Top
oPic.Left = .Left
Case Else
oPic.Visible = False
End Select
Next oPic
End With
End Sub

Option Explicit
Private Sub Worksheet_Calculate()
Dim oPic As Picture
With Range("A32")
For Each oPic In Me.Pictures
Select Case LCase(oPic.Name)
Case LCase("PictureNICEIC"), LCase("PictureEst"),
LCase("PictureLogo")
'do nothing
Case Is = LCase(.Text)
oPic.Visible = True
oPic.Top = .Top
oPic.Left = .Left
Case Else
oPic.Visible = False
End Select
Next oPic
End With
End Sub


Workbooks.Open Filename:= _
"P:\01 Estimates\01 Estimate Record Book\Estimate Book.xls"
ActiveWindow.WindowState = xlMinimized
ActiveWindow.WindowState = xlMaximized
End Sub


thanks in advance!

 

[Dave Peterson]

It looks like you pasted a bit more than you wanted (or not quite all you
needed), but...

Those macros run whenever the worksheet that owns them gets calculated.

You're going to have to make a choice--keep the event macro (and lose Edit|Undo)
or delete that event macro and get back the edit|undo.