Get-Mailbox コマンドの結果をパイプラインで受け取って予定表フォルダーのアクセス権を設定する

function Update-CalendarFolderPermission()
{
    [CmdletBinding()]
    param(
        # 対象メールボックス
        [Parameter(ValueFromPipeline=$true, Mandatory=$true)] # パイプラインからの引数渡しを許可し、引数の指定を必須とする
        [ValidateNotNullorEmpty()] # Null を許可しない
        $Identity,

        # アクセス権を付与するユーザー
        [Parameter(Mandatory=$true)] # 引数の指定を必須とする
        [ValidateScript({(@("default", "anonymous").Contains($_.ToLower())) -or (@("UserMailbox", "MailUser", "MailContact", "MailUniversalSecurityGroup").Contains((Get-Recipient $_).RecipientType))})] # Exchange の受信者であるか確認
        [string]
        $User,

        # アクセス権
        [Parameter(Mandatory=$true)] # 引数の指定を必須とする
        [ValidateSet("ReadItems", "CreateItems","EditOwnedItems" ,"DeleteOwnedItems" ,"EditAllItems", "DeleteAllItems", "CreateSubfolders", "FolderOwner", "FolderContact", "FolderVisible", "None", "Owner", "PublishingEditor", "Editor", "PublishingAuthor","Author", "NonEditingAuthor", "Reviewer", "Contributor", "AvailabilityOnly", "LimitedDetails")]
        [string]
        $AccessRights
    )

    process
    {
        try
        {
            [string]$TargetMailbox = $null # 対象メールボックス

            if($Identity.GetType().Name -eq "string")
            {
                Write-Verbose "Identity に String 型のデータが指定されたため、そのまま TargetMailbox として使用します。"
                $TargetMailbox = $Identity
            }
            elseif(($Identity | Get-Member Alias -MemberType Property).Length -eq 1)
            {
                Write-Verbose "Identity に Alias プロパティを含むデータが指定されたため、Alias プロパティを TargetMailbox として使用します。"
                $TargetMailbox = $Identity.Alias
            }
            else
            {
                Write-Verbose "Identity に指定されたデータを String 型に変換して TargetMailbox として使用します。"
                $TargetMailbox = $Identity.ToString()
            }

            $Folders = Get-MailboxFolderStatistics -Identity $TargetMailbox -FolderScope Calendar | where { $_.FolderType -eq "Calendar" }
            foreach ($Folder in $Folders)
            {
                $Error.Clear() # エラーをクリア

                $CalendarPath = $TargetMailbox + ":" + $Folder.FolderId
                Set-MailboxFolderPermission -Identity $CalendarPath -User $User -AccessRights $AccessRights 2> $null  # エラーになっても継続

                # エラー処理
                if($error.Count -ne 0)
                {
                    Write-Verbose "Set-MailboxFolderPermission コマンドの実行時にエラーが発生しました。"

                    if($Error[0].CategoryInfo.Reason -eq "UserNotFoundInPermissionEntryException")
                    {
                        # アクセス権を持たないユーザーに対して Ser-MailboxFolderPermission を実行してエラーになったので、
                        # Add-MailboxFolderPermission で対処する

                        Write-Verbose "エラーは UserNotFoundInPermissionEntryException でした。"

                        $Error.Clear()
                        Add-MailboxFolderPermission -Identity $CalendarPath -User $User -AccessRights $AccessRights > $null

                        if($Error.Count -ne 0)
                        {
                            Write-Verbose "Add-MailboxFolderPermission コマンドの実行にも失敗しました。"
                            Write-Error $Error[0]
                        }
                        else
                        {
                            Write-Verbose "エラーなく Add-MailboxFolderPermission コマンドが実行されました。"
                            Write-Output "$TargetMailbox の予定表の $User のアクセス権を $AccessRights に設定しました。"
                        }
                    }
                    else
                    {
                        Write-Verbose "エラーは予期せぬエラーでした。"
                        Write-Error $Error[0]
                    }
                }
                else
                {
                    Write-Verbose "エラーなく Set-MailboxFolderPermission コマンドが実行されました。"
                    Write-Output "$TargetMailbox の予定表フォルダーの $User のアクセス権を $AccessRights に変更しました。"
                }
            }
        }
        catch
        {
            Write-Error $_.Exception.Message
        }
    }
}

. C:\temp\Update-CalendarFolderPermission.ps1

Update-CalendarFolderPermission -Identity User01 -User Default -AccessRights Reviewer

Update-CalendarFolderPermission -Identity User01 -User User02 -AccessRights Editor

Get-Mailbox User01 | Update-CalendarFolderPermission -User User02 -AccessRights Editor

Get-Mailbox -ResultSize Unlimited | Update-CalendarFolderPermission -User Default -AccessRights None