View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
jC! jC! is offline
external usenet poster
 
Posts: 10
Default disregard the Outlook dialog box sending task/eMail from Excel 2003

hi all,

currently i am creating a macro in Excel 2003 which will create an
Outlook Task which is assigned and send to the recipient. the issue is
that Outlook 2003 displays a dialog box asking if this access is
allowed. my question is it at all possible to have this dialog box
either suppressed or have it automatically acknowledged by line of
code.

the code so far:
Sub CreateTask()

Dim olApp As Outlook.Application
Dim olTsk As TaskItem
Dim objRecipient As Outlook.Recipient

Set olApp = New Outlook.Application
Set olTsk = olApp.CreateItem(olTaskItem)

With olTsk
.Assign
Set objRecipient = ")
.Subject = "Test Task1"
'.Status = olTaskInProgress
.Importance = olImportanceHigh
.DueDate = DateValue("06/26/03")
.TotalWork = 40
.ActualWork = 20
.Save
.Send
End With

Set olTsk = Nothing
Set olApp = Nothing

End Sub

any help is mostly appreciated - cheers....


.....jurgenC!