Document.SendMail (Word)

Abre una ventana de mensaje para enviar el documento especificado a través de Microsoft Exchange.

Use la propiedad SendMailAttach para controlar si el documento se envía como texto en la ventana de mensaje o como datos adjuntos.

Options.SendMailAttach = True 
ActiveDocument.SendMail