本示例在活动文档开始处插入一个新段落。

Set myRange = ActiveDocument.Range(0, 0)
With myRange
    .InsertParagraph
    .InsertBefore "××,你好:"
End With