R Raven New Member Outlook version Outlook 2010 64 bit Email Account Exchange Server Apr 7, 2014 #1 How to copy outlook 2010 shared calendar appointment or meeting to personal calendar by vba? Attachments upload_2014-4-7_14-8-5.png 330 bytes · Views: 619 upload_2014-4-7_14-8-8.png 330 bytes · Views: 600
Diane Poremsky Senior Member OS Version(s) MacOSWindowsiOSAndroid Outlook version Outlook 2016 32 bit Email Account Office 365 Exchange Apr 7, 2014 #2 You'll use the method here : http://www.slipstick.com/developer/copy-new-appointments-to-another-calendar-using-vba/ and change the path used by the original calendar (Set curCal = NS.GetDefaultFolder(olFolderCalendar).Items) and the copy (Set newCalFolder = GetFolderPath("display name in folder list\Calendar\Test")) If copying from shared to local, you'd basically switch the two lines - Set curCal = GetFolderPath("display name in folder list\Calendar\Test").Items Set newCalFolder = NS.GetDefaultFolder(olFolderCalendar)
You'll use the method here : http://www.slipstick.com/developer/copy-new-appointments-to-another-calendar-using-vba/ and change the path used by the original calendar (Set curCal = NS.GetDefaultFolder(olFolderCalendar).Items) and the copy (Set newCalFolder = GetFolderPath("display name in folder list\Calendar\Test")) If copying from shared to local, you'd basically switch the two lines - Set curCal = GetFolderPath("display name in folder list\Calendar\Test").Items Set newCalFolder = NS.GetDefaultFolder(olFolderCalendar)