expression.SmartCutPaste
expression Required. An expression that returns an Options object.
Example
This example sets Word to automatically adjust the spacing between words and punctuation when cutting and pasting occurs, and then it cuts and pastes some text in a newly created document. If the SmartCutPaste property were set to False, the second and third words would run together.
Options.SmartCutPaste = True
Set myDoc = Documents.Add
With myDoc
.Content.InsertAfter("The brown quick fox")
.Words(2).Cut
.Characters(10).Paste
End With
This example returns the status of the Smart cut and paste option on the Edit tab in the Options dialog box (Tools menu).
temp = Options.SmartCutPaste