Enviar Correo desde Excel con VBA

03/06/2009 - 18:10 por Yrjo | Informe spam
Buenos días, tengo una macro que envía un correo con el asunto que yo quiero
y al destinatario indicado, en una parte del código utilizo estas opciones
que me permiten hacer eso:

Set mail = CreateObject("Outlook.Application")
Set Email = mail.CreateItem(olMailItem)
Set adjuntos = Email.Attachments
With Email
.Display
.To = destinatario
.cc = cc
.Subject = Asunto
.Body = cuerpoCorreo
.Send
End With

pero quisiera saber cómo activar las demás opciones y dónde hay un listado
de estas y sus posibles valores, como por ejemplo hacer que la importancia
sea alta, que haya opciones de seguimiento, activar la confirmación de
entrega y/o lectura, etc.

Muchas gracias por la ayuda que me puedan brindar.
 

Leer las respuestas

#1 Héctor Miguel
03/06/2009 - 19:29 | Informe spam
hola, 'anonimo/a' !

... tengo una macro que envia un correo con el asunto que yo quiero y al destinatario indicado
en una parte del codigo utilizo estas opciones que me permiten hacer eso: (...)
pero quisiera saber como activar las demas opciones y dande hay un listado de estas y sus posibles valores
como por ejemplo hacer que la importancia sea alta, que haya opciones de seguimiento, activar la confirmacion de entrega y/o lectura, etc.



(creo que) tu primer alternativa debiera ser usar la ayuda del modelo de objetos de outlook, para lo cual...
-> establece una referencia a la libreria de outlook (segun tu version) a tu proyecto de macros...
desde (menu) herramientas / referencias...
-> despues podras explorar los objetos disponibles asi como sus metodos, propiedades, etc.
-> deberas cambiar la forma de establecer la referencia a un objeto outlook +/- ...
de: -> Set mail = CreateObject("Outlook.Application")
a: -> Set mail = New Outlook.Application
-> y ya tendras disponible la ayuda "senstiva" desde el mismo codigo que vas escribiendo ;)

otra alternativa es consultar directamente en el grupo de outlook

otra mas, es visitar la pagina de Ron de Bruin con sus ejemplos para envio de correos desde excel-vba:
-> Example Code for sending mail from Excel: http://www.rondebruin.nl/sendmail.htm

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

__ el codigo expuesto _
Set mail = CreateObject("Outlook.Application")
Set Email = mail.CreateItem(olMailItem)
Set adjuntos = Email.Attachments
With Email
.Display
.To = destinatario
.cc = cc
.Subject = Asunto
.Body = cuerpoCorreo
.Send
End With

Preguntas similares