AddReplacement 方法

       

向“自动更正”替换文本数组中添加自动更正项。

expression.AddReplacement(What, Replacement)

expression   必需。该表达式返回一个 AutoCorrect 对象。

What   String 类型,必需。要被替换的文本。如果该字符串已存在于自动更正替换文本数组中,则现有的替换文本将被新文本取代。

Replacement   String 类型,必需。替换文本。

示例

本示例在自动更正替换文字数组中,将单词“Temperature”的替换单词指定为“Temp.”。

With Application.AutoCorrect
    .AddReplacement "Temperature", "Temp."
End With