Compartir a través de


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

Objeto Application

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.