Classe AutoCorrect (Word VBA)

La classe AutoCorrect représente la fonctionnalité Correction automatique de Word.

Set

Pour utiliser une variable de classe AutoCorrect, elle doit d'abord être instanciée, par exemple

Dim act as AutoCorrect
Set act = AutoCorrect

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe AutoCorrect : Application.AutoCorrect et Application.AutoCorrectEmail

For Each

Voici un exemple de traitement des éléments AutoCorrect dans une collection

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

Propriétés

CorrectCapsLock La valeur true si Word corrige automatiquement les instances dans lesquelles vous utilisez la touche VERR.MAJ par inadvertance en cours de frappe.

AutoCorrect.CorrectCapsLock = True

CorrectDays La valeur true si Word met automatiquement en majuscule la première lettre des jours de la semaine.

AutoCorrect.CorrectDays = True

CorrectHangulAndAlphabet La valeur true si Microsoft Word applique automatiquement la police correcte aux mots en caractères latins tapés au milieu d'un texte en hangûl, et inversement.

AutoCorrect.CorrectHangulAndAlphabet = True

CorrectInitialCaps La valeur true si Word met automatiquement la deuxième lettre minuscule si les deux premières lettres d'un mot sont tapées en majuscules.

AutoCorrect.CorrectInitialCaps = True

CorrectKeyboardSetting La valeur true si Microsoft Word doit transposer automatiquement les mots dans leur alphabet natif si vous tapez le texte dans une langue autre que la langue du clavier actuelle.

AutoCorrect.CorrectKeyboardSetting = True

CorrectSentenceCaps La valeur true si Word met automatiquement en majuscule la première lettre de chaque phrase.

AutoCorrect.CorrectSentenceCaps = True

CorrectTableCells True pour mettre automatiquement en majuscule la première lettre des cellules du tableau.

AutoCorrect.CorrectTableCells = True

DisplayAutoCorrectOptions True pour que Microsoft Word affiche le bouton Options de correction automatique.

AutoCorrect.DisplayAutoCorrectOptions = True

Entries Renvoie une collection AutoCorrectEntries qui représente la liste actuelle des entrées de correction automatique.

Dim acesEntries As AutoCorrectEntries
Set acesEntries = AutoCorrect.Entries

FirstLetterAutoAdd La valeur true si Word ajoute automatiquement des abréviations dans la liste des exceptions de correction automatique des initiales.

AutoCorrect.FirstLetterAutoAdd = True

FirstLetterExceptions Renvoie une collection FirstLetterExceptions qui représente la liste des abréviations après lesquelles Word ne met pas automatiquement en majuscule la lettre suivante.

Dim flesFirstLetterExceptions As FirstLetterExceptions
Set flesFirstLetterExceptions = AutoCorrect.FirstLetterExceptions

HangulAndAlphabetAutoAdd True si Microsoft Word ajoute automatiquement des mots à la liste des exceptions de correction automatique hangûl et alphabétiques.

AutoCorrect.HangulAndAlphabetAutoAdd = True

HangulAndAlphabetExceptions Renvoie une collection HangulAndAlphabetExceptions qui représente la liste des exceptions de correction automatique de l’alphabet ou de l’hangûl.

Dim haasHangulAndAlphabetExceptions As HangulAndAlphabetExceptions
Set haasHangulAndAlphabetExceptions = AutoCorrect.HangulAndAlphabetExceptions

OtherCorrectionsAutoAdd La valeur true si Microsoft Word ajoute automatiquement des mots à la liste des exceptions de correction automatique figurant sous l'onglet autres corrections de la boîte de dialogue exceptions de correction automatique (menu Outils , commandeCorrection automatique).

AutoCorrect.OtherCorrectionsAutoAdd = True

OtherCorrectionsExceptions Renvoie une collection OtherCorrectionsExceptions qui représente la liste des mots que Microsoft Word ne corrige pas automatiquement.

Dim ocesOtherCorrectionsExceptions As OtherCorrectionsExceptions
Set ocesOtherCorrectionsExceptions = AutoCorrect.OtherCorrectionsExceptions

Parent Renvoie un Object qui représente l'objet parent de l'objet AutoCorrect spécifié.

Dim objParent As Object
Set objParent = AutoCorrect.Parent

ReplaceText La valeur true si Microsoft Word remplace automatiquement le texte spécifié par des entrées de la liste de correction automatique.

AutoCorrect.ReplaceText = True

ReplaceTextFromSpellingChecker La valeur true si Microsoft Word remplace automatiquement le texte mal orthographié par les suggestions émanant du vérificateur d'orthographe tapés par l'utilisateur.

AutoCorrect.ReplaceTextFromSpellingChecker = True

TwoInitialCapsAutoAdd La valeur true si Microsoft Word ajoute automatiquement des mots à la liste des exceptions de correction automatique de la deuxième majuscule.

AutoCorrect.TwoInitialCapsAutoAdd = True

TwoInitialCapsExceptions Renvoie une collection TwoInitialCapsExceptions qui représente la liste des termes contenant des combinaisons de majuscules et minuscules que Word ne corrige pas automatiquement.

Dim ticsTwoInitialCapsExceptions As TwoInitialCapsExceptions
Set ticsTwoInitialCapsExceptions = AutoCorrect.TwoInitialCapsExceptions