Word) (Document.ActiveWritingStyle 属性

返回或设置指定文档中指定语言的写作风格。 读/写 String。

语法

expression。 ActiveWritingStyle( _LanguageID_ )

expression 是必需的。 一个代表 Document 对象的变量。

参数

名称	必需/可选	数据类型	说明
LanguageID	必需	Variant	要指定文档中设置的写作风格的语言。 可以是一个字符串或下面的 WdLanguageID 常量之一。 一些 WdLanguageID 常量可能不可用，这取决于您所选择或安装的语言支持 (例如美国英语)。

备注

WritingStyleList 属性返回可用的写作风格的名称的数组。

示例

本示例设置活动文档中法语、德语和美国英语的写作风格。 若要运行本示例，必须安装法语、德语和美国英语的语法文件。

With ActiveDocument 
 .ActiveWritingStyle(wdFrench) = "Commercial" 
 .ActiveWritingStyle(wdGerman) = "Technisch/Wiss" 
 .ActiveWritingStyle(wdEnglishUS) = "Technical" 
End With

本示例返回选定内容的语言的写作风格。

Sub WhichLanguage() 
 Dim varLang As Variant 
 
 varLang = Selection.LanguageID 
 MsgBox ActiveDocument.ActiveWritingStyle(varLang) 
End Sub

另请参阅

Document 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。