TypeText 方法

插入指定的文本。如果 ReplaceSelection 属性为 True，则用指定文本替换所选内容。如果 ReplaceSelection 为 False，则在所选内容之前插入指定的文本。

expression   必需。该表达式返回一个 Selection 对象。

Text   String 类型，必需。要插入的文字。

示例

如果已选中“选项”对话框“编辑”选项卡中的“键入内容替换所选内容”复选框，则本示例在插入“Hello”之前折叠选定内容。该技术可以防止替换现有的文字。

If Options.ReplaceSelection = True Then
    Selection.Collapse Direction:=wdCollapseStart
    Selection.TypeText Text:="Hello"
End If

本示例插入“Title”和一个新段落。

Options.ReplaceSelection = False
With Selection
    .TypeText Text:="Title"
    .TypeParagraph
End With