Office 365 Adressbuch automatisch in die Liste

Hallo,

ich wir sind vor wenigen Tagen auf office 365 + Hosted Exchange umgestiegen. Nun schaffe ich es aber nicht ein neu angelegtes Adressbuch (Public-Folder) automatisch in die Adressbuchliste hinzufügen zu lassen. Kennt jemand eine möglichkeit?

Hier ist eine Anleitung wie es "Manuell" geht:

https://support.intermedia.com/app/articles/detail/a_id/10738/type/KB -> Ich brauche es aber automatisiert? ... jemand eine Idee?

Ich kann aber nicht von jedem Benutzer verlangen, dass er diese Schritte/Einstellungen immer selbstständig bei Neuerungen tätigen muss. Des weiteren muss ich sagen, dass die ganze office 365 + Hosted Exchange Lösung von Microsoft einfach schlecht ist! ... bitte spart euch die Antworten mit "Ja weil du es nicht kannst", "dann lern es doch" ... ich kenne mich mit office 365 in einem guten Rahmen aus und die Vorgehensweise wie man manche Sachen löst ist einfach nur SCHLECHT!

dim contacts
' Kontaktordner aus dem öffentlichen Ordner holen  
set contacts = CreateObject("Outlook.Application").GetNamespace("MAPI").GetDefaultFolder(18).Folders.Item("Marketing").Folders.Item("Kontakte")  
With contacts
    ' Haken setzen  
    .ShowAsOutlookAB = True
    ' Name für die Darstellung des Adressbuchs vergeben  
    .AddressBookName = "MyContacts"  
End with

# Kontaktordner aus dem öffentlichen Ordner holen
$contacts = (New-Object -Com Outlook.Application).GetNamespace("MAPI").GetDefaultFolder(18).Folders['Marketing'].Folders['Kontakte']  
# Haken setzen
$contacts.ShowAsOutlookAB = $true
# Name für die Darstellung des Adressbuchs vergeben
$contacts.AddressBookName = "MyContacts"