Dictionaries.Add メソッド (Word)

アクティブなユーザー設定スペル チェック辞書または変換辞書のコレクションに追加する、新しいユーザー設定スペル チェック辞書または変換辞書を表す Dictionary オブジェクトを返します。

構文

式。Add (FileName)

expression 必須です。 'Dictionaries' コレクションを表す変数。

パラメーター

名前	必須 / オプション	データ型	説明
FileName	必須	String	ディクショナリ ファイルの文字列名。 文字列にパスが指定されていない場合は、校正ツールのパスが使用されます。

戻り値

Dictionary

注釈

FileName パラメーターに指定された名前のファイルが存在しない場合は、そのファイルが作成されます。

辞書 のコレクションには、アクティブなユーザー設定スペル チェック辞書だけが含まれています。 言語 のコレクションから派生する ディクショナリ オブジェクトの Add メソッドがありません。 ActiveSpellingDictionary 、 ActiveGrammarDictionary 、 ActiveThesaurusDictionary 、および ActiveHyphenationDictionary プロパティによって返される ディクショナリ オブジェクトが含まれます。

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

関連項目

ディクショナリ コレクション オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。