Outlook Banter

Outlook Banter (http://www.outlookbanter.com/)
-   Outlook and VBA (http://www.outlookbanter.com/outlook-vba/)
-   -   Related items in VBA Code (http://www.outlookbanter.com/outlook-vba/62078-related-items-vba-code.html)

[email protected] November 28th 07 04:56 PM

Related items in VBA Code
 
We would like to add Contacts through VBA code. Easy enough. We
would also like to add Tasks, Calendar Items, Notes, and Journal Items
through VBA code that are related to the contacts in question. We are
using Outlook 2003.

We can get as far as adding the Contacts, and then we can add Tasks,
because Tasks have a read/write property of ContactNames, so if I
create a Contact and name it after myself, relating a task to my new
contact takes one line of code:

tsk1.ContactNames = "David"

Doing the same with a Journal item should be easy, but it's not,
because doing this:

jrn1.ContactNames = "David"

doesn't work, i.e. the journal entry is created, but it does not show
up in the Contact's activity screen.

Appointment items and Note items do not seem to have a similar
"ContactNames" property.

So the question is this: Is there a way to create Tasks,
Appointments, Notes, and Journal items through VBA code that relate
back to contacts? Any code samples would be appreciated greatly!
Thank you!

David


Eric Legault [MVP - Outlook] November 28th 07 05:48 PM

Related items in VBA Code
 
Use the Links collection instead to add related Contact items, as in:

myLinks = myJournalItem.Links
myLinks.Add (myContactItem)
myJournalItem.Save

--
Eric Legault - Outlook MVP, MCDBA, MCTS (SharePoint programming, etc.)
Try Picture Attachments Wizard for Outlook:
http://www.collaborativeinnovations.ca
Blog: http://blogs.officezealot.com/legault/


" wrote:

We would like to add Contacts through VBA code. Easy enough. We
would also like to add Tasks, Calendar Items, Notes, and Journal Items
through VBA code that are related to the contacts in question. We are
using Outlook 2003.

We can get as far as adding the Contacts, and then we can add Tasks,
because Tasks have a read/write property of ContactNames, so if I
create a Contact and name it after myself, relating a task to my new
contact takes one line of code:

tsk1.ContactNames = "David"

Doing the same with a Journal item should be easy, but it's not,
because doing this:

jrn1.ContactNames = "David"

doesn't work, i.e. the journal entry is created, but it does not show
up in the Contact's activity screen.

Appointment items and Note items do not seem to have a similar
"ContactNames" property.

So the question is this: Is there a way to create Tasks,
Appointments, Notes, and Journal items through VBA code that relate
back to contacts? Any code samples would be appreciated greatly!
Thank you!

David




All times are GMT +1. The time now is 10:19 AM.

Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Search Engine Friendly URLs by vBSEO 2.4.0
Copyright ©2004-2006 OutlookBanter.com