Question : How to use VBA to add a calendar entry to a shared calendar

I've been playing around with some VBA code and I can create a new calendar entry in my default calendar without a problem.

My problem is that I need to add a calendar entry to other people's calendars too. I have write access to the respective calendars (i.e. I can manually add an entry to the other persons calendar in Outlook 2003).

I think my problem maybe a lack of understanding of the object model ( never really lookd at Outlook's OM before) so any giudance would be appreciated.

Please note that this has to be done outside Outlook, initially it will be from an Access 2003 db and then a standalone VB6 app. The point I'm making is that I can't use VB Script or any other language from within Outlook itself.

Answer : How to use VBA to add a calendar entry to a shared calendar

As the shared calender is not in the default mailbox, you would need to use the StoreID property, you can use this piece of code to get the ID from the folders:

You will have to reference the outlook dll

Public Sub test()
Dim MyOlApp as Outlook.Application
Dim myFld As Folder
Set myFld = MyOlApp.Session.PickFolder
Debug.Print myFld.StoreID
End Sub

This will give you a huge long number in the debug window, you can copy and paste in and use it in this code:

Set = Outlook.Session.GetFolderFromID("HERE">

Then you can use the code you have for creating the calendar entry and add on the end

myitem.Move myFld

That should do the trick :)