Application.CustomDictionaries プロパティ (Word)

  • [アーティクル]

有効なユーザー辞書のコレクションを表す Dictionaries オブジェクトを取得します。 値の取得のみ可能です。

構文

expression. CustomDictionaries

expressionApplicationオブジェクトを表す変数 。

注釈

有効なユーザー辞書は、[ユーザー辞書] ダイアログ ボックスでチェック ボックスがオンになっている辞書です。 コレクションの 1 つのメンバーを返す方法については、「コレクション からオブジェクトを返す」を参照してください。

例

次の使用例は、新しい空のユーザー辞書をコレクションに追加します。 その後、新しいユーザー辞書のパスとファイル名をメッセージ ボックスに表示します。

Dim dicHome As Dictionary 
Set dicHome = CustomDictionaries.Add(Filename:="Home.dic") 
Msgbox dicHome.Path & Application.PathSeparator & dicHome.Name

次の使用例は、すべての有効なユーザー辞書を無効にします。 ただし、ユーザー辞書ファイルそのものは削除しません。

CustomDictionaries.ClearAll

次の使用例は、コレクションの各ユーザー辞書の名前を表示します。

Dim dicLoop As Dictionary 
 
For Each dicLoop In CustomDictionaries 
 MsgBox dicLoop.Name 
Next dicLoop

関連項目

Application オブジェクト

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

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