通过

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

使用 Add 方法可向 AutoTextEntries 集合中添加一个自动图文集条目。 下面的示例添加一个名为"蓝的"基于所选内容的文本的自动图文集词条。

NormalTemplate.AutoTextEntries.Add Name:="Blue", _ 
 Range:=Selection.Range

使用 AutoTextEntries (索引) （其中 index 是自动图文集条目名称或索引号）可返回单个 AutoTextEntry 对象。 名称拼写必须和“自动更正”对话框中“自动图文集”选项卡上显示的完全一样（但大小写可以不一样）。 以下示例设置名为“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 支持和反馈，获取有关如何接收支持和提供反馈的指南。