Word VBA教程:AutoTextEntry对象

Application
Templates (Template)
AutoTextEntries (AutoTextEntry)

代表单个“自动图文集”词条。AutoTextEntry对象是AutoTextEntries集合中的元素。AutoTextEntries集合包括指定模板中的“自动图文集”词条。这些词条都列在“自动更正”对话框(“工具”菜单)内的“自动图文集”选项卡上。

使用 AutoTextEntry对象

用 AutoTextEntries(index) 可返回单个 AutoTextEntry对象,其中 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

下列示例在插入点插入名为“TheWorld”的共用“自动图文集”词条。


Selection.Collapse Direction:=wdCollapseEnd
NormalTemplate.AutoTextEntries("TheWorld").Insert _
    Where:=Selection.Range

Add方法可在 AutoTextEntries集合中添加 AutoTextEntry对象。下列示例根据选定部分的文字添加一个名为“Blue”的“自动图文集”词条。


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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号