HangulAndAlphabetExceptions Property Example

This example prompts the user to delete or keep each hangul and alphabet AutoCorrect exception on the Korean tab in the AutoCorrect Exceptions dialog box.

For Each anEntry In _
        AutoCorrect.HangulAndAlphabetExceptions
    response = MsgBox("Delete entry: " _
        & anEntry.Name, vbYesNoCancel)
    If response = vbYes Then
        anEntry.Delete
    Else 
        If response = vbCancel Then End
    End If
Next anEntry