Macro para manda emails

Hola a todos

Estoy haciendo una macro, que mande por e-mail el archivo
activo, lo hice con la instruccion

ActiveDocument.SendMail

y me abre una ventana del Outlook con el archivo adjunto,
y esta bien, pero lo quiero es que tambien ponga la
direccion de correo, el titulo y si es posible que de una
vez por todas lo envie.

Pero no tengo ni la menor idea de como hacerlo, alguien me
puede ayudar???