 Page [ 1 ]
|
|||
| Outlook Expert Techniques Printer Friendly Version | |||
|
Working with toolbars, menus, ribbon; generating custom reports; deploying forms; connecting to databases, Exchange folders, and XML Web services | ||
| Topic | |||
|
need to remove COPY-calender items
We have exported around 150 users from OST to PST using outlook export and import and then imported to new mailbox profiles now the problem is i can see COPY: in calendar appointments when i open copy items it says "the meeting was copied to your calendar and will not receive update" Any one help me how can i remove these copy and make them as original i found below code but it only removes copy on appointments but the warning still there "can not receive update" Sub FixCopy() Dim calendar As MAPIFolder Dim calItem As Object Set calendar = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderCalendar) Dim iItemsUpdated As Integer Dim strTemp As String iItemsUpdated = 0 For Each calItem In calendar.Items If Mid(calItem.Subject, 1, 6) = "Copy: " Then strTemp = Mid(calItem.Subject, 7, Len(calItem.Subject) - 6) calItem.Subject = strTemp iItemsUpdated = iItemsUpdated + 1 End If calItem.Save Next calItem MsgBox iItemsUpdated & " of " & calendar.Items.Count & " Items Updated" End Sub Please help me naresh k 25-Feb-2013 09:40 |
||
|
Page [ 1 ]
|
|||
| Post a new message to this topic. |