J
jC!
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 = .Recipients.Add("(e-mail address removed)")
.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!
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 = .Recipients.Add("(e-mail address removed)")
.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!