Word) (語言物件

代表用於校訂或格式設定 Microsoft Word 中的語言。 Language 物件是 語言 集合的成員。

註解

使用 語言 (Index) 可傳回單一的 Language 物件，其中 Index 可以為 WdLanguageID 常數之一，或其中一個 MsoLanguageID 常數的 NameLocal 屬性值的 Name 屬性的值。 (如有效 WdLanguageID 或 MsoLanguageID 常數的清單，請參閱 Visual Basic 編輯器中 [物件瀏覽器)。

Name 屬性傳回語言的名稱而 NameLocal 屬性會傳回使用者語言的語言名稱。 下列範例會傳回字串"文 」 名稱 與"義大利文 (標準)" NameLocal 美國英文版的 Word 執行時。

Sub ShowItalianNames() 
 Msgbox Languages(wdItalian).Name 
 Msgbox Languages(wdItalian).NameLocal 
End Sub

安裝校訂工具的每種語言，您可以使用 ActiveGrammarDictionary 、 ActiveHyphenationDictionary 、 ActiveSpellingDictionary 及 ActiveThesaurusDictionary 屬性可傳回相對應的 Dictionary 物件。 下列範例會傳回用於美國英文版的 Word 的使用中拼字檢查字典的完整路徑。

Sub ShowDictionaryPath 
 Set myspell = Languages(wdEnglishUS).ActiveSpellingDictionary 
 MsgBox mySpell.Path & Application.PathSeparator & mySpell.Name 
End Sub

書寫樣式為的文法檢查工具所使用的規則集。 WritingStyleList 屬性會傳回代表指定之語言的可用的書寫樣式的字串陣列。 下列範例會傳回清單以便使用美國英文書寫樣式。

Sub ListWritingStyles() 
 WrStyles = Languages(wdEnglishUS).WritingStyleList 
 For i = 1 To UBound(WrStyles) 
 MsgBox WrStyles(i) 
 Next i 
End Sub

使用 DefaultWritingStyle 屬性可設定預設的書寫樣式您想要 Word 使用。

Languages(wdEnglishUS).DefaultWritingStyle = "Casual"

您可以覆寫預設的書寫樣式與 ActiveWritingStyle 屬性。 此屬性會套用至指定的文件中指定的語言標記的文字。 下列範例會設定要用於檢查使用中文件內的美式英文、 法文及德文的書寫樣式。

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

如果您將文字標示為 wdNoProofing 時執行拼字或文法檢查, Word 跳過標示的文字。

注意事項

[!注意事項] 您想要檢查的每一種語言都必須安裝校訂工具。 如需使用其他語言的詳細資訊，請參閱與語言相關的資訊。

請參閱

Word 物件模型參考資料

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。