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.PasteEnd If

本示例剪切第一个段落的第一个单词，并将该单词粘贴到该段落的末尾。

With ActiveDocument.Paragraphs(1).Range    .Words(1).Cut    .Collapse Direction:=wdCollapseEnd    .Move Unit:=wdCharacter, Count:=-1    .PasteEnd With

本示例剪切所选内容，并粘贴到新文档中。

If Selection.Type = wdSelectionNormal Then    Selection.Cut    Documents.Add.Content.PasteEnd If