Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Agrega la referencia a Outlook a tu proyecto y fijate con esto:
Dim objOutlook As Outlook.Application, objTask As TaskItem
Set objOutlook = New Outlook.Application
Set objTask = objOutlook.CreateItem(olTaskItem)
With objTask .Subject = "Prueba" .Importance = olImportanceHigh .Categories = "Personal" .StartDate = Now .DueDate = Now .Body = "Esta es una Tarea de Prueba" .Save End With
objOutlook.Quit
Valora esta respuesta
0
Comentar
ejecutar como procedimiento el contenido de una va