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.

Preguntas similare

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
Respuesta Responder a este mensaje
#2 Yrjo
03/06/2009 - 20:46 | Informe spam
Muchas gracias Héctor por la ayuda

"Héctor Miguel" wrote:

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



email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida