Word VBA教程：Cut方法

Word VBA教程：Cut方法·内容正文

将指定对象从文档中移到剪贴板上。

expression.Cut

expression   必需。该表达式返回一个 Field、FormField、Frame、MailMergeField、PageNumber、Range 或 Selection对象。

说明

如果 expression 返回 Range 或 Selection对象，则将该对象中的内容剪切到剪贴板上，但是折叠的对象还保留在文档中。

VBA示例

本示例剪切活动文档的第一个域，并将该域粘贴到插入点。

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