将指定对象从文档中移到剪贴板上。
expression.Cut
expression 必需。该表达式返回一个 Field、FormField、Frame、MailMergeField、PageNumber、Range 或 Selection 对象。
如果 expression 返回 Range 或 Selection 对象,则将该对象中的内容剪切到剪贴板上,但是折叠的对象还保留在文档中。
本示例剪切活动文档的第一个域,并将该域粘贴到插入点。
If ActiveDocument.Fields.Count >= 1 Then
ActiveDocument.Fields(1).Cut
Selection.Collapse Direction:=wdCollapseEnd
Selection.Paste
End If
本示例剪切第一个段落的第一个单词,并将该单词粘贴到该段落的末尾。
With ActiveDocument.Paragraphs(1).Range
.Words(1).Cut
.Collapse Direction:=wdCollapseEnd
.Move Unit:=wdCharacter, Count:=-1
.Paste
End With
本示例剪切所选内容,并粘贴到新文档中。
If Selection.Type = wdSelectionNormal Then
Selection.Cut
Documents.Add.Content.Paste
End If