Appointment Recipients

11/06/2009 - 04:25 por Rob | Informe spam
Saludos
He seguido de cerca las consultas sobre la interaccion de Excel con Outlook
(principal y obviamente las de Hector Miguel) y casi he obtenido lo que
necesito.

Creo por codigo VBA una cita y agrego los asistentes. La salvo y la envio
con el metodo .Send ...

Sin embargo Outlook solo la crea en mi calendario pero no la envia
automaticamente a los asistentes.
Para enviarla tengo que abrir la cita y hacer click manual en el boton
'invitar a los asistentes' y luego 'enviar'.

Ojala alguien pudiera orientarme hacia la solucion

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
11/06/2009 - 05:54 | Informe spam
hola, Rob !

He seguido de cerca las consultas sobre la interaccion de Excel con Outlook... y casi he obtenido lo que necesito.
Creo por codigo VBA una cita y agrego los asistentes. La salvo y la envio con el metodo .Send ...
Sin embargo Outlook solo la crea en mi calendario pero no la envia automaticamente a los asistentes.
Para enviarla tengo que abrir la cita y hacer click manual en el boton 'invitar a los asistentes' y luego 'enviar'...



(definitivamente) no hay suficiente informacion difundida (visible y amigablemente) por la web (me refiero a ejemplos "practicos")
sin embargo, consultando la ayuda en linea {F1} de OutLook (hay que consultarla cotidianamente para "aprender a encontrar")
contiene ejemplos que no debieran ser de dificil adaptacion para situaciones mas "especificas", como los siguientes:
(en relacion con los asistentes a reuniones, si son requeridos u opcionales o recursos de sala, etc.)

== Set myItem = myOlApp.CreateItem(olAppointmentItem)
myItem.MeetingStatus = olMeeting
myItem.Subject = "Strategy Meeting"
myItem.Location = "Conference Room B"
myItem.Start = #9/24/97 1:30:00 PM#
myItem.Duration = 90
Set myRequiredAttendee = myItem.Recipients.Add("Nate Sun")
myRequiredAttendee.Type = olRequired
Set myOptionalAttendee = myItem.Recipients.Add("Kevin Kennedy")
myOptionalAttendee.Type = olOptional
Set myResourceAttendee = myItem.Recipients.Add("Conference Room B")
myResourceAttendee.Type = olResource
myItem.Send
==
y (por si las dudas) si estas usando automatizacion "late bindng" (en vez de referencias a las librerias de OL)
algunas de las constantes-nombradas en este ejemplo corresponden con las siguientes constantes-valor:

0: olOrganizer - Organizador de la reunion
1: olRequired - Asistente necesario
2: olOptional - Asistente opcional
3: olResource - Un recurso como una sala de conferencias

espero algo de lo anterior te sea de utilidad, pero ya sabes...
si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.
Respuesta Responder a este mensaje
#2 Rob
11/06/2009 - 15:56 | Informe spam
Hector
Funciona de maravilla!
I vote for you as 2009 Excel MVP

Gracias por el 'regaño'... :)
La verdad es que somos (sin generalizar) flojos y nos rendimos rapidamente
sin buscar lo suficiente en la ayuda
Lo bueno es que existen chicos como tu

Gracias otra vez




"Héctor Miguel" escribió en el mensaje
news:
hola, Rob !

He seguido de cerca las consultas sobre la interaccion de Excel con
Outlook... y casi he obtenido lo que necesito.
Creo por codigo VBA una cita y agrego los asistentes. La salvo y la envio
con el metodo .Send ...
Sin embargo Outlook solo la crea en mi calendario pero no la envia
automaticamente a los asistentes.
Para enviarla tengo que abrir la cita y hacer click manual en el boton
'invitar a los asistentes' y luego 'enviar'...



(definitivamente) no hay suficiente informacion difundida (visible y
amigablemente) por la web (me refiero a ejemplos "practicos")
sin embargo, consultando la ayuda en linea {F1} de OutLook (hay que
consultarla cotidianamente para "aprender a encontrar")
contiene ejemplos que no debieran ser de dificil adaptacion para
situaciones mas "especificas", como los siguientes:
(en relacion con los asistentes a reuniones, si son requeridos u
opcionales o recursos de sala, etc.)

==> Set myItem = myOlApp.CreateItem(olAppointmentItem)
myItem.MeetingStatus = olMeeting
myItem.Subject = "Strategy Meeting"
myItem.Location = "Conference Room B"
myItem.Start = #9/24/97 1:30:00 PM#
myItem.Duration = 90
Set myRequiredAttendee = myItem.Recipients.Add("Nate Sun")
myRequiredAttendee.Type = olRequired
Set myOptionalAttendee = myItem.Recipients.Add("Kevin Kennedy")
myOptionalAttendee.Type = olOptional
Set myResourceAttendee = myItem.Recipients.Add("Conference Room B")
myResourceAttendee.Type = olResource
myItem.Send
==>
y (por si las dudas) si estas usando automatizacion "late bindng" (en vez
de referencias a las librerias de OL)
algunas de las constantes-nombradas en este ejemplo corresponden con las
siguientes constantes-valor:

0: olOrganizer - Organizador de la reunion
1: olRequired - Asistente necesario
2: olOptional - Asistente opcional
3: olResource - Un recurso como una sala de conferencias

espero algo de lo anterior te sea de utilidad, pero ya sabes...
si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

Respuesta Responder a este mensaje
#3 Héctor Miguel
11/06/2009 - 20:17 | Informe spam
hola, Rob !

Funciona de maravilla! (...)
Gracias por el 'regaño'... :)
La verdad es que somos (sin generalizar) flojos y nos rendimos rapidamente sin buscar lo suficiente en la ayuda ...



me da gusto que "ser terco/obstinado/..." (de la forma buena) hasta lograr respuestas, siga rindiendo sus frutos ;)

gracias por el "feed-back", queda en los registros para otras consultas similares (y por el voto de confianza)

saludos,
hector.

__ previos __
He seguido de cerca las consultas sobre la interaccion de Excel con Outlook... y casi he obtenido lo que necesito.
Creo por codigo VBA una cita y agrego los asistentes. La salvo y la envio con el metodo .Send ...
Sin embargo Outlook solo la crea en mi calendario pero no la envia automaticamente a los asistentes.
Para enviarla tengo que abrir la cita y hacer click manual en el boton 'invitar a los asistentes' y luego 'enviar'...



(definitivamente) no hay suficiente informacion difundida (visible y amigablemente) por la web (me refiero a ejemplos "practicos")
sin embargo, consultando la ayuda en linea {F1} de OutLook (hay que consultarla cotidianamente para "aprender a encontrar")
contiene ejemplos que no debieran ser de dificil adaptacion para situaciones mas "especificas", como los siguientes:
(en relacion con los asistentes a reuniones, si son requeridos u opcionales o recursos de sala, etc.)

==>> Set myItem = myOlApp.CreateItem(olAppointmentItem)
myItem.MeetingStatus = olMeeting
myItem.Subject = "Strategy Meeting"
myItem.Location = "Conference Room B"
myItem.Start = #9/24/97 1:30:00 PM#
myItem.Duration = 90
Set myRequiredAttendee = myItem.Recipients.Add("Nate Sun")
myRequiredAttendee.Type = olRequired
Set myOptionalAttendee = myItem.Recipients.Add("Kevin Kennedy")
myOptionalAttendee.Type = olOptional
Set myResourceAttendee = myItem.Recipients.Add("Conference Room B")
myResourceAttendee.Type = olResource
myItem.Send
==>>
y (por si las dudas) si estas usando automatizacion "late bindng" (en vez de referencias a las librerias de OL)
algunas de las constantes-nombradas en este ejemplo corresponden con las siguientes constantes-valor:

0: olOrganizer - Organizador de la reunion
1: olRequired - Asistente necesario
2: olOptional - Asistente opcional
3: olResource - Un recurso como una sala de conferencias
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida