Document.Kind (Word)

Devuelve o establece el tipo de formato que Microsoft Word usa cuando se da formato automáticamente al documento especificado. Posibles valores de retorno son wdDocumentEmail - Formato de correo electrónico, wdDocumentLetter - Formato de carta, wdDocumentNotSpecified - No especifica ningún formato.

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