Excel - Crear tarea outlook

 
Vista:

Crear tarea outlook

Publicado por ismael (1 intervención) el 06/04/2013 11:21:39
Hola Foro:
tengo una macro VB, para crear una tarea en Outlook 2010 desde una macro Excel 2010 (no es mia. Lan encontré en la red, y no recuerdo al autor. Lo siento).

[i]Sub CrearTareaOutlook()
Dim objectOutlook As Object
Dim objectTarea As Object
Set objectOutlook = CreateObject("Outlook.Application")
Set objectTarea = objectOutlook.CreateItem(olTaskItem)
'Set objectTarea = objectOutlook.CreateItem(IPM.Task.Tarea9)
With objectTarea
.Subject = "Prueba - 05-04-2013" 'Cells(5, 7).Value 'Título de la tarea
.Body = "Mas prueba" 'Cells(5, 7).Value 'Detalle de la tarea
.ReminderSet = True 'Recordar True/False
.ReminderTime = DateAdd("h", 24, Now) 'Recordar cada 24 horas si .ReminderSet = True
.DueDate = 5 / 4 / 2013 'Cells(11, 27).Value 'Fecha tarea
.Save
End With
Set objectTarea = Nothing
Set objectOutlook = Nothing
End Sub

Crea la tarea, utilizando el formulario normal de la aplicación.El tema es que quiero, que la cree utilizando un formulario personalizado. Como puedo llamar a este formulario personalizado?? Alguien me puede ayudar???.

Este formulario personalizado, contiene en el cuerpo de la Tarea una tabla con dos hipervínculos a carpetas del sistema de archivos. Como los puedo modificar al crear la Tarea????
Gracias por vuestro tiempo.
Saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder