Document.MailEnvelope (Word)

Renvoie un objet MsoEnvelope qui représente un en-tête de message électronique pour un document.

Sub HeaderComments() 
 
 ActiveDocument.MailEnvelope.Introduction = _ 
 "Please review this document and let me know " & _ 
 "what you think. I need your input by Friday." & _ 
 " Thanks." 
 
End Sub