Dictionaries.Add 方法 (Word)

傳回代表新自訂拼字檢查或轉換字典的 Dictionary 物件加入至使用中自訂拼字檢查或轉換字典之集合。

語法

運算式。新增 (FileName)

需要 expression。 代表 'Dictionaries' 集合的變數。

參數

名稱	必要/選用	資料類型	描述
FileName	必要	String	字典檔案的字串名稱。 如果字串中未指定任何路徑，則會使用校對工具路徑。

傳回值

Dictionary

註解

如果 FileName 參數所指定之名稱的檔案不存在，則 Microsoft Word 會自行建立一個檔案。

Dictionaries 集合包含只使用中自訂拼字檢查字典。 Dictionary 物件衍生自 Languages 集合沒有 Add 方法。 這些包括 ActiveSpellingDictionary 、 ActiveGrammarDictionary 、 ActiveThesaurusDictionary 及 ActiveHyphenationDictionary 屬性所傳回 Dictionary 物件。

使用 HangulHanjaDictionaries 屬性可傳回自訂轉換字典之集合。 HangulHanjaConversionDictionaries 集合包含只使用中自訂轉換字典。

範例

這個範例會移除自訂拼字檢查字典清單中所有字典，並建立新的自訂字典檔。 這個新字典會指派為使用中的自訂字典，並且新的字會自動加入到該字典中。

With CustomDictionaries 
 .ClearAll 
 .Add FileName:="c:\My Documents\MyCustom.dic" 
 .ActiveCustomDictionary = CustomDictionaries(1) 
End With

此範例會建立新的自訂字典，並將它指派給變數。 新的自訂字典接著會設定為用於標示為加拿大法文的文字。 請注意，若要執行另一種語言的拼字檢查，您必須已安裝該語言的校訂工具。

Sub FrCanDic() 
 Dim dicFrenchCan As Dictionary 
 
 Set dicFrenchCan = CustomDictionaries.Add(FileName:="FrenchCanadian.dic") 
 With dicFrenchCan 
 .LanguageSpecific = True 
 .LanguageID = wdFrenchCanadian 
 End With 
End Sub

本範例會從自訂轉換字典清單中移除所有字典，並建立新的自訂字典檔案。 這個新字典會指派為使用中的自訂字典，並且新的字會自動加入到該字典中。

With HangulHanjaDictionaries 
 .ClearAll 
 .Add FileName:="C:\My Documents\MyCustom.hhd" 
 .ActiveCustomDictionary = CustomDictionaries(1) 
End With

另請參閱

Dictionaries 集合物件

支援和意見反應

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