AutoTextEntries オブジェクト (Word)
テンプレートの定型句の項目を表す AutoCorrectEntry オブジェクトのコレクションです。 AutoTextEntries コレクションには、[ オート コレクト] ダイアログ ボックスの [ 定型句] タブに記載されているすべてのエントリが含まれています。
注釈
AutoTextEntries プロパティを使用して AutoTextEntries コレクションを取得します。 次の例では、"test"という名前の AutoTextEntry オブジェクトが AutoTextEntries コレクションにはあるかどうかを決定します。
For Each i In NormalTemplate.AutoTextEntries
If LCase(i.Name) = "test" Then MsgBox "AutoText entry exists"
Next i
AutoTextEntries コレクションに定型句エントリを追加するには、Add メソッドを使用します。 次の使用例は、選択範囲の文字列に基づいて "Blue" という名前の定型句を追加します。
NormalTemplate.AutoTextEntries.Add Name:="Blue", _
Range:=Selection.Range
1 つの AutoTextEntry オブジェクトを返すには、AutoTextEntries (index) を使用します。index は定型句エントリ名またはインデックス番号です。 定型句の登録名は [ オートコレクト] ダイアログ ボックスの [ 定型句] タブに表示される名前と正確に一致している必要がありますが、大文字と小文字は区別されません。 次の使用例は、"cName" という名前の既存の定型句の値を設定します。
NormalTemplate.AutoTextEntries("cName").Value = _
"The Johnson Company"
次の使用例は、作業中の文書に添付されたテンプレートの最初の定型句の名前と値を表示します。
Set myTemplate = ActiveDocument.AttachedTemplate
MsgBox "Name = " & myTemplate.AutoTextEntries(1).Name & vbCr _
& "Value " & myTemplate.AutoTextEntries(1).Value
メソッド
プロパティ
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。