vldyr.ps1

# Dette script giver alle brugere rettigheder til at redigere i alle brugeres kalendere.
# Skal køres ved oprettelse af ny medarbejder, for at alle får adgang til personens kalender - og hun får til alle andres.

#Import-Module ExchangeOnlineManagement

#Connect-ExchangeOnline

$AllMailboxes = Get-Mailbox -RecipientTypeDetails SharedMailbox,UserMailbox | Where { $_.UserPrincipalName -like '*@vldyr.dk'}

foreach($Mailbox in $AllMailboxes) {
    $Email = $($Mailbox.UserPrincipalName)
    $Group = "kalender_rediger@vldyr.dk"

    $calendarName =(Get-EXOMailboxFolderStatistics -Identity $Mailbox.UserPrincipalName -Folderscope Calendar | Where-Object FolderType -eq 'Calendar').Name
    Add-MailboxFolderPermission $Email":\"$calendarName -User $Group -AccessRights Editor
    # Forsøg med både :\Calendar og :\Kalender hvis mailboks sproget ikke er sat korrekt.
    #Set-MailboxFolderPermission -Identity $CalendarEnglish -User Default -AccessRights Editor
    #Set-MailboxFolderPermission -Identity $CalendarDanish -User Default -AccessRights Editor

}