Word VBA教程:Entries属性

返回一个AutoCorrectEntries集合,该集合代表当前的“自动更正”词条列表。该列表与“工具”菜单上“自动更正”对话框中“自动更正”选项卡上的“自动更正”词条列表相对应。只读。

有关返回集合中单个成员的内容,请参阅返回集合中的对象

VBA示例

本示例显示“自动更正”词条总数。


MsgBox AutoCorrect.Entries.Count

本示例删除指定的原有“自动更正”词条。


Dim strEntry As String
Dim acEntry As AutoCorrectEntry
Dim blnMatch As Boolean
Dim intResponse As Integer
strEntry = InputBox("Enter the AutoCorrect entry to delete.")
blnMatch = False
For Each acEntry in AutoCorrect.Entries
    If acEntry.Name = strEntry Then
        blnMatch = True
        intResponse = _
            MsgBox("Are you sure you want to delete " _
            & acEntry.Name, 4)
        If intResponse = vbYes Then
            acEntry.Delete
        End If
    End If
Next acEntry
If blnMatch <> True Then
    MsgBox "There was no AutoCorrect entry: " & strEntry
End If

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号