Word VBA教程:FirstLetterExceptions属性

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

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

VBA示例

本示例将“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

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号