根据当前所选内容,将一个新的 AutoTextEntry 对象加到 AutoTextEntries 集合中。
expression.CreateAutoTextEntry(Name, StyleName)
expression 必需。该表达式返回一个 Selection 对象。
Name String 类型,必需。该文本必须由用户键入,以调用新的“自动图文集”词条。
StyleName String 类型,必需。在该类别中的“自动图文集”词条将列出在“自动图文集”菜单中。
本示例在“Mailing Instructions”类别下,以“HAND DELIVERY”作为当前选中的文本创建一个新的名为“handdel”的“自动图文集”词条。
Selection.CreateAutoTextEntry "handdel", _
"Mailing Instructions"