EmailOptions.PlainTextStyle (Word)

Renvoie l’objet style qui représente les attributs de texte pour les messages électroniques envoyés ou reçus en texte brut.

Sub PlainTxt() 
 With Application.EmailOptions.PlainTextStyle 
 .Font.Name = "Tahoma" 
 .Font.Size = 10 
 End With 
End Sub