albertminrich
Goto Top

Startzeit einer Serie per vba ändern?

Hallo,

ich möchte per vba die Startzeit einer Serie ändern, ohne bereits vorhandene Ausnahmen der Serie zu überschreiben.
Mein Code sieht so aus (nur zum Testen, ohne Überprüfung, ob es sich auch um einen Serientermin handelt:

Dim myolApp As Outlook.Application
Set myolApp = CreateObject("Outlook.Application")
Set mynamespace = myolApp.GetNamespace("MAPI")
Set myFolder = mynamespace.GetDefaultFolder(olFolderCalendar)
Set myitems = myFolder.Items

For Each termin In myitems
termin.GetRecurrencePattern.StartTime = #11/16/2008 9:00:00 AM#
termin.Save
Next

Das klappt zwar, allerdings werden alle Ausnahmen überschrieben.
Nächster Versuch:

For Each termin In myitems
termin.start = #11/16/2008 9:00:00 AM#
termin.Save
Next

Fehlermeldung: "Sie sind nicht dazu berechtigt, dieses Element zu
verschieben."

Komischerweise lässt sich aber z.B. der Betreff ändern:
For Each termin In myitems
termin.subject = "neuer Betreff"
termin.Save
Next


Wie geht´s richtig?
Danke
Martin

Content-Key: 102032

Url: https://administrator.de/contentid/102032

Printed on: April 18, 2024 at 14:04 o'clock