RESPONDER UNA PREGUNTA

Si para responder la pregunta, crees necesario enviar un archivo adjunto, puedes hacerlo a traves del correo [email protected]

    Pregunta:  64451 - PROBLEMA PARA EJECUTAR UN MACRO EN OUTLOOK 2003
Autor:  Juan Camilo Soto
Buenas noches a todos:

Para que entiendan mi pregunta les voy a explicar mi situación.

He creado un macro que al ser ejecutado mediante el llamado a Outlook por la linea de comando en un acceso directo "%programfiles%microsoftofficeoffice11outlook.exe" /recycle /autorun Test, donde test es el nombre de mi macro. Al abrir outlook, este crea un nuevo elemento contacto y copia el contenido del portapapeles de windows en el campo body del formulario. cabe aclarar que el objeto que se pasa al dataobject ya está establecido como texto, ahí no hay problema. El código del macro es el siguiente:

Dim DtObj As New dataobject

Sub Test()
Dim myOlapp As Object
Dim myContact As ContactItem
Set myOlapp = CreateObject("Outlook.Application")
Set myContact = myOlapp.CreateItem(olContactItem)
myContact.Display
DtObj.GetFromClipboard
myContact.Body = DtObj.GetText
msgbox ("Si va a guardar este contacto, recuerde hacerlo en la carpeta de contactos activa.")
End Sub

Esto funciona muy bien siempre y cuando Outlook se encuentre cerrado, cuando ejecuto el acceso directo y se abre Outlook no tengo problema. El problema que tengo es que el acceso directo necesito usarlo varias veces y como tengo información abierta en Outlook, no puedo cerrar y abrir Outlook cada vez que necesite hacerlo. cuando ejecuto el acceso directo y outlook está abierto no ejecuta la macro.

¿Existe algún metodo, funcion, propiedad o configuración de Outlook que este omitiendo?.

Muchas gracias por la orientación que me puedan dar.


Nombre
Apellidos
Correo
Comentarios