I am trying to setup an outlook folder in Access VBA so that my database can save appointments to a calendar in Outlook, the problem is that I don't want to save them to my calendar but to a joint one with others which I have set up in a personal folder (.pst file) and everyone links to it on their outlook. So I need to set this folder up in my VBA code. I found some code that lets you add subfolders (I think) rather than the set folders in the mailbox, the code is:
Set myFolder = NameSpace.GetDefaultFolder(olPublicFoldersAllPublicFolders)
Set myFolder = myFolder.Folders("Marketing Reminders")
Set objAppt = myFolder.Items.Add
But this is still not personal folders, does anyone know how to link them?
The personal folder is called LeaveCal and the calendar inside is called LeaveCalendar, if anyone can show me how to write the code.
Set myFolder = NameSpace.GetDefaultFolder(olPublicFoldersAllPublicFolders)
Set myFolder = myFolder.Folders("Marketing Reminders")
Set objAppt = myFolder.Items.Add
But this is still not personal folders, does anyone know how to link them?
The personal folder is called LeaveCal and the calendar inside is called LeaveCalendar, if anyone can show me how to write the code.
