Document.Kind (Word)

Renvoie ou définit le type de format utilisé par Microsoft Word lors de la mise en forme automatique du document spécifié. Les valeurs de retour possibles sont wdDocumentEmail - Format du message électronique, wdDocumentLetter - Format Lettre, wdDocumentNotSpecified - Aucun format spécifié.

response = MsgBox("Is this document an email message?", vbYesNo) 
If response = vbYes Then 
 ActiveDocument.Kind = wdDocumentEmail 
 ActiveDocument.Content.AutoFormat 
End If