返回“自动更正”替换条目的数组。
expression.ReplacementList(Index)
expression 必需。该表达式返回一个 AutoCorrect 对象。
Index Variant 类型,可选。要返回的“自动更正”替换条目数组的行索引。该行以两元素的一维数组形式返回:第一个元素为第一列中的文本,第二个元素为第二列中的文本。
可用 AddReplacement 方法向替换文本列表添加自动更正项。
本示例在替换文本列表中搜索“Temperature”的替换条目,如果存在,则显示该替换条目。
repl = Application.AutoCorrect.ReplacementList
For x = 1 To UBound(repl)
If repl(x, 1) = "Temperature" Then MsgBox repl(x, 2)