Word) (AutoCorrect.FirstLetterExceptions 屬性
會傳回代表 Word 不會自動大寫之後的縮寫清單 FirstLetterExceptions 集合的下一個字母。 唯讀。
語法
expression。 FirstLetterExceptions
表達 代表 'AutoCorrect' 物件的變數。
註解
此清單會對應至 [自動校正例外規則] 對話方塊中 [第一個字母] 索引標籤上的自動校正例外規則清單。 如需傳回集合中單一成員的資訊,請參閱 從集合傳回物件。
範例
此範例會將 "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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。