该属性返回或设置线条格式样式。MsoLineStyle,可读写。
MsoLineStyle 可以是下列 MsoLineStyle 常量之一: |
msoLineSingle |
msoLineThickBetweenThin |
msoLineThinThick |
msoLineStyleMixed |
msoLineThickThin |
msoLineThinThin |
expression.Style
expression 必需。该表达式返回一个 LineFormat 对象。
应用于 EmailAuthor 和 Revision 对象的 Style 属性。
该属性返回或设置用于指定对象的样式。若要设置该属性,请指定样式的本地名称、一个整数值、一个 WdBuiltinStyle 常量或一个代表该样式的对象。若要获取有效常量的列表,请查询“Microsoft Visual Basic 对象浏览器”。Variant 类型,可读写。
expression.Style
expression 必需。该表达式返回上述对象之一。
对于包含多个样式的区域,只返回第一个字符或段落的样式。
本示例返回与当前未发送的答复邮件、转发邮件或新电子邮件作者相关联的样式,并显示与该样式相关的字体名称。
Set MyEmailStyle = _
ActiveDocument.Email.CurrentEmailAuthor.Style
Msgbox MyEmailStyle.Font.Name
本示例显示活动文档中每个段落的样式。
For Each para in ActiveDocument.Paragraphs
MsgBox para.Style
Next para
本示例交替设置活动文档中的所有段落为“标题 3”和“正文”样式。
For i = 1 To ActiveDocument.Paragraphs.Count
If i Mod 2 = 0 Then
ActiveDocument.Paragraphs(i).Style = wdStyleNormal
Else: ActiveDocument.Paragraphs(i).Style = wdStyleHeading3
End If
Next i
本示例显示所选内容中每个字符的样式。Characters 集合的每个元素都是一个 Range 对象。
For each c in Selection.Characters
MsgBox c.Style
Next c