FirstLetterExceptions 属性

       

返回一个 FirstLetterExceptions 集合,该集合代表了缩写词列表,Word 不会将在这些缩写词后的第一个字母自动置为大写。该列表与“‘自动更正’例外项”对话框中的“首字母大写”选项卡上的“自动更正”例外项列表相对应。此对话框由“工具”菜单上的“自动更正”命令打开。只读。

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

示例

本示例将“apt.”添至“首字母大写”的“自动更正”例外项列表中。

AutoCorrect.FirstLetterExceptions.Add "apt."

本示例删除指定的原有“首字母大写”的“自动更正”例外项。

Dim strException As String
Dim fleLoop As FirstLetterException
Dim blnMatch As Boolean
Dim intConfirm As Integer

strException = _
    InputBox("Enter the First Letter exception to delete.")
blnMatch = False

For Each fleLoop in AutoCorrect.FirstLetterExceptions
    If fleLoop.Name = strException Then
        blnMatch = True
        intConfirm = MsgBox("Are you sure you want to delete " _
            & fleLoop.Name, 4)
        If intConfirm = vbYes Then
            fleLoop.Delete
        End If
    End If
Next fleLoop

If blnMatch <> True Then
    MsgBox "There was no First Letter exception: " _
        & strException
End If