A
Atishoo
Everyone seems to feel that this is the sub for creating a new task in
outlook:-
I keep getting the error message "user defined type not defined"
any ideas where im going wrong?
Dim olApp As Outlook.Application
Dim olTsk As TaskItem
Set olApp = New Outlook.Application
Set olTsk = olApp.CreateItem(olTaskItem)
With olTsk
.Subject = "Update Web Site"
.Status = olTaskInProgress
.Importance = olImportanceHigh
.DueDate = DateValue("06/26/03")
.TotalWork = 40
.ActualWork = 20
.Save
End With
Set olTsk = Nothing
Set olApp = Nothing
End Sub
outlook:-
I keep getting the error message "user defined type not defined"
any ideas where im going wrong?
Dim olApp As Outlook.Application
Dim olTsk As TaskItem
Set olApp = New Outlook.Application
Set olTsk = olApp.CreateItem(olTaskItem)
With olTsk
.Subject = "Update Web Site"
.Status = olTaskInProgress
.Importance = olImportanceHigh
.DueDate = DateValue("06/26/03")
.TotalWork = 40
.ActualWork = 20
.Save
End With
Set olTsk = Nothing
Set olApp = Nothing
End Sub