Propiedad Application.AutoCorrect (Word)
Devuelve un objeto AutoCorrect que incluye las opciones, elementos y excepciones actuales de Autocorrección. Solo lectura.
Sintaxis
expresión. AutoCorrect
expresión Variable que representa un objeto Application.
Ejemplo:
En este ejemplo, se agrega un elemento de sustitución de Autocorrección. Después de ejecutar este código, cada instancia de "sr" que se escriba en un documento será sustituida automáticamente por "Stella Richards".
AutoCorrect.Entries.Add Name:= "sr", Value:= "Stella Richards"
En este ejemplo, se elimina el elemento de Autocorrección especificado, si existe.
Dim strInput as String
Dim aceLoop as AutoCorrectEntry
Dim blnMatch as Boolean
Dim intConfirm as Integer
blnMatch = False
strInput = InputBox("Enter the AutoCorrect entry to delete.")
For Each aceLoop in AutoCorrect.Entries
With aceLoop
If .Name = strInput Then
blnMatch = True
intConfirm = _
MsgBox("Are you sure you want to delete " & _
.Name, 4)
If intConfirm = vbYes Then
.Delete
End If
End If
End With
Next aceLoop
If blnMatch <> True Then
MsgBox "There was no AutoCorrect entry: " & strInput
End If
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.