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
 

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.

Preguntas similares