本示例显示选定的文本。

If Selection.Type = wpsSelectionNormal Then MsgBox Selection.Text

 

本示例对所选内容应用 Arial 字体和加粗格式。

With Selection.Font
    .Bold = True
    .Italic = False
    .Name = "Arial"
End With