Resets a set of document settings that can be saved internally, including Unit, Drawing Origin, Curve Precision, Reference Point, PreserveSelection, ShapeEnumdirection, and Apply To Duplicate
Syntax:
SubResetSettings()
Remarks:
The ResetSettings method resets the following properties to the following values.
Examples:
The following VBA example creates an ellipse with a radius 50 mm in the middle of the page. It preserves and restores all document settings.
Sub Test()
With ActiveDocument
.SaveSettings
.ResetSettings
.Unit = cdrMillimeter
.DrawingOriginX = 0
.DrawingOriginY = 0
.ActiveLayer.CreateEllipse2 0, 0, 50
.RestoreSettings
End With
End Sub