Edit: Habs mit PowerShell gelöst.
----
Hi,
ich möchte einen Sharepoint-Kalender zu einer bestimmten bestehenden Kalender-Gruppe in Outlook mit VBA hinzufügen, bzw. zu einer, die ich anlege:
Automatisch wird aber immer die Kalendergruppe "Andere Kalender" erstellt. Wie kann ich meine Kalendergruppe "Bereitschaft" zur Vorgabe (zum Parent) machen, damit der Sharepoint-Kalender dort eingebunden wird?
Vielen Dank.
imho
Quellcode
- Add-Type -AssemblyName 'Microsoft.Office.Interop.Outlook'
- $olNavigationModule = 'Microsoft.Office.Interop.Outlook.OlNavigationModuleType' -as [type]
- $outlook = New-Object -comObject Outlook.Application
- $olNavigationPane = $outlook.Application.ActiveExplorer().NavigationPane
- $olCalendarModule = $olNavigationPane.Modules.GetNavigationModule($olNavigationModule::olModuleCalendar)
- $olCalendarGroups = $olCalendarModule.NavigationGroups
- $group = $olCalendarGroups.Create("Techniker")
- $Bereitschaft = $outlook.GetNamespace('MAPI').OpenSharedFolder('stssync://sts/?ver=1.1&type=calendar[...]name=Bereitschaft')
- $group.NavigationFolders.Add($Bereitschaft)
----
Hi,
ich möchte einen Sharepoint-Kalender zu einer bestimmten bestehenden Kalender-Gruppe in Outlook mit VBA hinzufügen, bzw. zu einer, die ich anlege:
Quellcode
- Sub NewOutlookCalendarGroup()
- Dim objOutlook As Outlook.Application
- Dim objNavigationPane As Outlook.NavigationPane
- Dim objCalendarModule As Outlook.CalendarModule
- Dim objCalendarGroups As Outlook.NavigationGroups
- Dim objCalendarGroup As Outlook.NavigationGroup
- Dim objCalendarFolders As Outlook.NavigationFolders
- Dim url As String
- Set objNavigationPane = Application.ActiveExplorer.NavigationPane
- Set objCalendarModule = objNavigationPane.Modules.GetNavigationModule(olModuleCalendar)
- Set objCalendarGroups = objCalendarModule.NavigationGroups
- objCalendarGroups.Create ("Bereitschaft")
- Set objOutlook = CreateObject("Outlook.Application")
- url = "stssync://sts/?ver=1.1&type=calendar&cmd=add-folder&base-url=https[...]Bereitschaft"
- objOutlook.Session.OpenSharedFolder (url)
- End Sub
Automatisch wird aber immer die Kalendergruppe "Andere Kalender" erstellt. Wie kann ich meine Kalendergruppe "Bereitschaft" zur Vorgabe (zum Parent) machen, damit der Sharepoint-Kalender dort eingebunden wird?
Vielen Dank.
imho
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „imho74“ ()