MsgBox Selection.Text
本示例在新文档中插入 10 行文字。
Documents.Add For i = 1 To 10 Selection.Text = "Line" & Str(i) & Chr(13) Selection.MoveDown Unit:=wpsParagraph, Count:=1 Next i