怠惰なMicrosoft365管理者

Get-Mailbox -Identity share001@****.onmicrosoft.com -RecipientTypeDetails SharedMailbox

Name      Alias    Database           ProhibitSendQuota    ExternalDirectoryObjectId
----      -----    --------           -----------------    -------------------------
share001  share001 APCPR21DG198-db519 99 GB (106,300,440,… 51d19379-c60e-4b11-be19- …
share002  share001 APCPR11DG751-db487 99 GB (106,300,440,… 019eaf48-b01c-4998-9884- …
share003  share001 APCPR74DG364-db115 99 GB (106,300,440,… 1732862a-bb1b-5250-b377- 

Get-RecipientPermission -Identity share001@****.onmicrosoft.com -ResultSize unlimited

Identity Trustee                      AccessControlType AccessRights Inherited
-------- -------                      ----------------- ------------ ---------
share001 NT AUTHORITY\SELF            Allow             {SendAs}     False
share001 user001@****.onmicrosoft.com Allow             {SendAs}     False
share001 user001@****.onmicrosoft.com Allow             {SendAs}     False

$csvSavePath = "$env:USERPROFILE\Desktop"

#CSVのファイル名
$csvFileName = "shareMailboxAccsess.csv"

$accountInfoCSV = [PSCustomObject]@{
    Identity = $null
    User = $null
    AccsessRights = $null
}

$accountInfoCSV | Export-Csv -Path "${csvSavePath}\${csvFileName}" `
-Encoding utf8 -NoTypeInformation

#CSVの保存先を指定する
$csvSavePath = "$env:USERPROFILE\Desktop"

#読み込むCSVファイル名を指定する
$csvFileName = "shareMailboxAccsess.csv"

#編集したCSVファイルを読み込む
$shareMailboxAccessList = Import-Csv -Path "${csvSavePath}\${csvFileName}"


#ExchangePowerShellに接続する
Connect-ExchangeOnline -ShowBanner:$false

#全ての共有メールボックスを取得する
$sharedMailboxlist = Get-Mailbox -RecipientTypeDetails SharedMailbox `
    -ResultSize unlimited

<# 共有メールボックスの既存のアクセス権を一度全て削除する #>

<#
    全ての共有メールボックスを読み込む
    [読み取り及び管理アクセス許可]の権限の情報を確認なしでリセットする
#>
$sharedMailboxlist | 
    Remove-MailboxPermission -ResetDefault -Confirm:$false

<#
    全ての共有メールボックスを読み込む
    付与されている権限を取得
    共有メールボックス自身の権限以外のアクセス権情報を抽出
    [メールボックス所有者として送信するアクセス許可]の権限を確認なしで削除する
#>
$sharedMailboxlist |
    Get-RecipientPermission -ResultSize unlimited |
    Where-Object{$_.Trustee -ne "NT AUTHORITY\SELF"} |
    Remove-RecipientPermission -AccessRights SendAs -Confirm:$false

<#
    全ての共有メールボックスを読み込む
    [代理人として送信するアクセス許可]の権限を削除する
#>
$sharedMailboxlist |
    Set-Mailbox -GrantSendOnBehalfTo $null

<# 新しいアクセス権を付与する #>

#フルアクセス権を付与するアカウント抽出する
$fullAccessAccountList = $shareMailboxAccessList | 
    Where-Object {$_.AccsessRights -eq "FullAccess"}

#[読み取り及び管理アクセス許可]の権限を付与する
foreach($fullAccessAccount in $fullAccessAccountList){
    Add-MailboxPermission `
        -Identity $fullAccessAccount.Identity `
        -User $fullAccessAccount.User `
        -AccessRights FullAccess
}

#所有者権限を付与するアカウントを抽出する
$sendAsAccountList = $shareMailboxAccessList | 
    Where-Object {$_.AccsessRights -eq "SendAs"}

#[メールボックス所有者として送信するアクセス許可]の権限を付与する
foreach($sendAsAccount in $sendAsAccountList){
    Add-RecipientPermission `
        -Identity $sendAsAccount.Identity `
        -Trustee $sendAsAccount.User `
        -AccessRights SendAs`
        -Confirm:$false
}

#代理人権限を付与するアカウント抽出する
$sendOnBehalfAccountList = $shareMailboxAccessList | 
    Where-Object {$_.AccsessRights -eq "SendOnBehalf"}

#[代理人として送信するアクセス許可]の権限を付与する
foreach($sendOnBehalfAccount in $sendOnBehalfAccountList){
    Set-Mailbox $sendOnBehalfAccount.Identity `
        -GrantSendOnBehalfTo @{Add=$sendOnBehalfAccount.User}
}