UndoEnabled Property [Visio 2003 SDK Documentation]
Determines whether undo information is maintained in memory.
boolVal = object**.UndoEnabled**
object**.UndoEnabled** = boolExpression
boolVal Boolean. True if the property is enabled; False if it is not.
object Required. An expression that returns an Application object.
boolExpression Required Boolean. True to enable undo; otherwise, False.
Version added
2000
Remarks
When Microsoft Office Visio starts, the value of the UndoEnabled property is True. Setting the value of the UndoEnabled property to False discontinues the collection of undo information in memory and purges the existing undo information.
An attempt should be made to maintain the property at its current value across the complete operation that you perform. In other words, use code structured like this:
blsPrevious = Application.UndoEnabled
Application.UndoEnabled = False
'Large operation here
Application.UndoEnabled = blsPrevious
Example
The following Microsoft Visual Basic for Applications (VBA) macro shows how to use the UndoEnabled method to disable and then re-enable undo behavior in Visio.
Public Sub UndoEnabled_Example()
'Disable undo
Application.UndoEnabled = False
'Draw three shapes.
ActivePage.DrawRectangle 1, 2, 2, 1
ActivePage.DrawOval 3, 4, 4, 3
ActivePage.DrawLine 4, 5, 5, 4
'Enable undo.
Application.UndoEnabled = True
End Sub
Applies to | Application object | Document object | InvisibleApp object
See Also | Redo method | Undo method