Word) (Document.ActiveWritingStyle 屬性
會傳回或設定指定之語言的書寫樣式中指定的文件。 讀取/寫入的 String。
語法
expression。 ActiveWritingStyle( _LanguageID_ )
需要 expression。 代表 Document 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| LanguageID | 必要 | Variant | 要將書寫樣式設定中指定的文件的語言。 可以是字串或下列 WdLanguageID 常數之一。 WdLanguageID 常數的一些可能無法使用，視您所選取或安裝的語言支援 (例如 US English) 而定。 |
註解
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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。