返回一个
AutoCorrect
对象，该对象包含当前“自动更正”的选项、词条和例外项。只读。
语法
表达式.AutoCorrect
表达式 一个代表 Application 对象的变量。
示例
本示例添加一个“自动更正”替换词条。运行此代码后，在文档中键入的所有“sr”都会自动替换为“Stella Richards”。
| 示例代码 |
AutoCorrect.Entries.Add("sr","Stella Richards")
|
本示例将删除指定的原有“自动更正”词条。
| 示例代码 |
let strInput
let aceLoop
let blnMatch
let intConfirm
blnMatch = false
strInput = prompt("Enter the AutoCorrect entry to delete.")
for(let i = 1; i <= AutoCorrect.Entries.Count; i++) {
aceLoop = AutoCorrect.Entries.Item(i)
if(aceLoop.Name == strInput) {
blnMatch == true
intConfirm =MsgBox("Are you sure you want to delete " + aceLoop.Name, jsYesNo)
if(intConfirm == jsResultYes) {
aceLoop.Delete()
}
}
}
if(blnMatch != true) {
MsgBox("There was no AutoCorrect entry: " + strInput)
}
|