Application.AutoCorrectEmail (Word)

Renvoie un objet AutoCorrect qui représente les corrections automatiques apportées aux messages électroniques.

Sub AutoCorrectEMailAddress() 
 With Application.AutoCorrectEmail 
 .Entries.Add Name:="allways", Value:="always" 
 .Entries.Add Name:="hte", Value:="the" 
 .Entries.Add Name:="hwen", Value:="when" 
 End With 
End Sub