Clase AutoCorrect (Word VBA)

La clase AutoCorrect representa la funcionalidad de Autocorrección de Word.

Set

Para usar una variable de clase AutoCorrect, primero debe ser instanciado, por ejemplo

Dim act as AutoCorrect
Set act = AutoCorrect

Los siguientes procedimientos se pueden usar para establecer variables de clase AutoCorrect : Application.AutoCorrect y Application.AutoCorrectEmail

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos AutoCorrect en una colección.

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

Propiedades

CorrectCapsLock True si Word corrige automáticamente los casos en que se utiliza la tecla BLOQ MAYÚS por error mientras se escribe.

AutoCorrect.CorrectCapsLock = True

CorrectDays True si Word pone automáticamente en mayúsculas la primera letra de los días de la semana.

AutoCorrect.CorrectDays = True

CorrectHangulAndAlphabet True si Microsoft Word aplica automáticamente la fuente correcta a las palabras Latín escritas en medio de texto Hangul o viceversa.

AutoCorrect.CorrectHangulAndAlphabet = True

CorrectInitialCaps True si Word pone automáticamente la segunda letra minúscula si las dos primeras letras de una palabra se escriban en mayúsculas.

AutoCorrect.CorrectInitialCaps = True

CorrectKeyboardSetting True si Microsoft Word transpone palabras automáticamente a su alfabeto nativo si se escribe texto en un idioma que no sea el idioma del teclado actual.

AutoCorrect.CorrectKeyboardSetting = True

CorrectSentenceCaps True si Word pone automáticamente en mayúsculas la primera letra de cada oración.

AutoCorrect.CorrectSentenceCaps = True

CorrectTableCells True para poner automáticamente en mayúscula la primera letra de celdas de tabla.

AutoCorrect.CorrectTableCells = True

DisplayAutoCorrectOptions True para que Microsoft Word muestre el botón Opciones de Autocorrección.

AutoCorrect.DisplayAutoCorrectOptions = True

Entries Devuelve una colección AutoCorrectEntries que representa la lista actual de elementos de Autocorrección.

Dim acesEntries As AutoCorrectEntries
Set acesEntries = AutoCorrect.Entries

FirstLetterAutoAdd True si Word agrega automáticamente abreviaturas a la lista de excepciones de letra inicial de Autocorrección.

AutoCorrect.FirstLetterAutoAdd = True

FirstLetterExceptions Devuelve una colección FirstLetterExceptions que representa la lista de abreviaturas tras las cuales Word no pondrá en mayúscula automáticamente la letra siguiente.

Dim flesFirstLetterExceptions As FirstLetterExceptions
Set flesFirstLetterExceptions = AutoCorrect.FirstLetterExceptions

HangulAndAlphabetAutoAdd True si Microsoft Word agrega automáticamente palabras a la lista de excepciones de Autocorrección de hangul y del alfabeto.

AutoCorrect.HangulAndAlphabetAutoAdd = True

HangulAndAlphabetExceptions Devuelve una colección HangulAndAlphabetExceptions que representa la lista de excepciones de Autocorrección de hangul y del alfabeto.

Dim haasHangulAndAlphabetExceptions As HangulAndAlphabetExceptions
Set haasHangulAndAlphabetExceptions = AutoCorrect.HangulAndAlphabetExceptions

OtherCorrectionsAutoAdd True si Microsoft Word agrega automáticamente palabras a la lista de excepciones de Autocorrección en la ficha otras correcciones en el cuadro de diálogo excepciones de Autocorrección (comandoOpciones de Autocorrección , menú herramientas ).

AutoCorrect.OtherCorrectionsAutoAdd = True

OtherCorrectionsExceptions Devuelve una colección OtherCorrectionsExceptions que representa la lista de palabras que Microsoft Word no corrige automáticamente.

Dim ocesOtherCorrectionsExceptions As OtherCorrectionsExceptions
Set ocesOtherCorrectionsExceptions = AutoCorrect.OtherCorrectionsExceptions

Parent Devuelve un objeto Object que representa el objeto primario del objeto AutoCorrect especificado.

Dim objParent As Object
Set objParent = AutoCorrect.Parent

ReplaceText True si Microsoft Word reemplaza automáticamente el texto especificado con elementos de la lista de Autocorrección.

AutoCorrect.ReplaceText = True

ReplaceTextFromSpellingChecker True si Microsoft Word reemplaza automáticamente el texto incorrecto con sugerencias del corrector ortográfico como los tipos de usuario.

AutoCorrect.ReplaceTextFromSpellingChecker = True

TwoInitialCapsAutoAdd True si Microsoft Word agrega automáticamente palabras a la lista de excepciones de mayúsculas iniciales de Autocorrección.

AutoCorrect.TwoInitialCapsAutoAdd = True

TwoInitialCapsExceptions Devuelve una colección TwoInitialCapsExceptions que representa la lista de términos que contienen mayúsculas mezcladas que Word no corregirá automáticamente.

Dim ticsTwoInitialCapsExceptions As TwoInitialCapsExceptions
Set ticsTwoInitialCapsExceptions = AutoCorrect.TwoInitialCapsExceptions