outlook task recipient

[Atishoo]

I can send a task to my own outlook but cant set another recipient using the
recipient command (it doesnt like it) (or maybe it just doesnt like me) what
code should I be using instead?

Dim olApp As Outlook.Application
Dim olTsk As TaskItem

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

With olTsk
..Recipients - ("Salter John")
..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

thanks

 

[broro183]

hi,

Try changing your ".recipients..." to
Code:
--------------------
.to
--------------------


There are lots of examples on Ron's site, 'Example Code for sending
mail from Excel' (http://www.rondebruin.nl/sendmail.htm), including this
one, 'Tips for the Outlook object model examples'
(http://www.rondebruin.nl/mail/tips2.htm), which shows ".recipients.add"
being used for adding a distribution list.

hth
Rob

 

[Atishoo]

hi
sorry it still comes back with "object does not support this property"

 

[broro183]

hi Atishoo,

Sorry, I hadn't read your OP properly & thought you were sending an
email rather than a Task. Unfortunately, Help files aren't installed on
the comuter I'm working on & so I can't easily investigate & test but
hopefully the below links may contain the answer for you to discover:

http://www.*****-clicks.com/excel/olTask.htm
'TaskRequestItem Object'
(http://msdn.microsoft.com/en-us/library/aa211086.aspx)
'Create MS Outlook task object by Excel macro - Excel Help Forum'
(http://tinyurl.com/q9ruea)
'Excel: Sending Outlook tasks via VBA, excel vba, windows xp sp2'
(http://en.allexperts.com/q/Excel-1059/Sending-Outlook-tasks-via.htm)
'Programatically Assign Outlook Task - Page 2'
(http://www.pcreview.co.uk/forums/thread-1838996-2.php)
Post 9 of:
http://www.access-programmers.co.uk/forums/showthread.php?t=79767
'ACC2000: How to Use Automation to Add a Task or a Reminder to
Microsoft Outlook'
(http://support.microsoft.com/default.aspx?scid=kb;en-us;209932)


These were all sourced from: '.CreateItem(olTaskItem) excel sub outlook
recipient - Google Search' (http://tinyurl.com/pez79b)

hth
Rob

 

[Atishoo]

Thankyou for your links have got it as follows thankyou.
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olTaskItem)
myItem.Assign
Set myDelegate = myItem.Recipients.Add("Jeff Smith")
myItem.Subject = "Prepare Agenda For Meeting"
myItem.DueDate = #9/20/97#
myItem.Send

 

[broro183]

Brilliant, I'm pleased you solved it. Thanks for the feedback & posting
your findings for others to use

Rob

 

[Atishoo]

Np Thanks for your help
it is worth noting that the code only works when pasted into the outlook VBE
I think to get it to work via Excell it would have to be recorded as a macro
in outlook then trigger that from excell?