共用方式為


Word) (AutoCorrect.FirstLetterExceptions 屬性

會傳回代表 Word 不會自動大寫之後的縮寫清單 FirstLetterExceptions 集合的下一個字母。 唯讀。

語法

expressionFirstLetterExceptions

表達 代表 '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

另請參閱

AutoCorrect 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應