Copy new appointments created in multiple shared calendars to another exchange calendar

Status
Not open for further replies.

Matthew Jones

New Member
Outlook version
Outlook 2013 32 bit
Email Account
Office 365 Exchange
Hello

I've been using the code here:

Copy New Appointments to Another Calendar using VBA

to duplicate all new calendar appointments from my calendar to a SharePoint Calendar. What I'd like to now is to duplicate all calendar entries I create in other users shared calendars as well.

My question is how do I alter the code from having a fixed 'source' calendar (currently my default calendar) to having a dynamic source calendar. e.g whichever shared or local calendar I am currently adding an appointment to?

Thanks all for your help.

Matthew
 

Matthew Jones

New Member
Outlook version
Outlook 2013 32 bit
Email Account
Office 365 Exchange
I did think about adding code to a custom appointment form to do this task if its easier, but I'm still not sure how to get the name of the current calendar.

I think it would be something like Application.ActiveInspector.CurrentItem.Parent but this doesn't seem to work.
 
Status
Not open for further replies.
Top