Solltet ihr feststellen, dass alle eure Termine in Outlook den Präfix „Kopieren“ haben nachdem ihr einen Kalender importiert habt, lässt sich dies in wenigen Schritten automatisch beheben.

  • Drückt in Outlook Alt+F11 um den VBA-Editor zu öffnen
  • Erweitert den Punkt „Projekt1“ dann „Microsoft Outlook Objekte“ und klickt dann doppelt auf „ThisOutlookSession“
  • In dem Fenster dass sich dann öffnet kopiert ihr folgenden Befehl hinein:

Sub RemoveCopy()
Dim myolApp As Outlook.Application
Dim calendar As MAPIFolder
Dim aItem As Object

Set myolApp = CreateObject("Outlook.Application")
Set calendar = myolApp.ActiveExplorer.CurrentFolder

Dim iItemsUpdated As Integer
Dim strTemp As String

iItemsUpdated = 0
For Each aItem In calendar.Items
If Mid(aItem.Subject, 1, 10) = "Kopieren: " Then
strTemp = Mid(aItem.Subject, 11, Len(aItem.Subject) - 10)
aItem.Subject = strTemp
iItemsUpdated = iItemsUpdated + 1
End If
aItem.Save
Next aItem

MsgBox iItemsUpdated & " of " & calendar.Items.Count & " Meetings Updated"

End Sub

 

Outlook entfernt daraufhin aus sämtlichen Terminen den Präfix, am besten Outlook in Ruhe lassen da dies je nach Kalendergröße einige Zeit dauern kann.