Report eDiscovery cases

Connect-ExchangeOnline -ShowBanner:$false
Connect-IPPSSession

$ClosedCases = 0 ;$ActiveHolds = 0
$Report = [System.Collections.Generic.List[Object]]::new()
Write-Host "Finding eDiscovery Cases"
$Cases = Get-ComplianceCase -ErrorAction SilentlyContinue
Write-Host $Cases.Count " cases found. Now extracting information."
 
ForEach ($Case in $Cases) {
    Write-Host "Processing eDiscovery Case:" $Case.Name
    $CaseMembers = (Get-ComplianceCaseMember -Case $Case.Name | Select Name, WindowsLiveId)
    $Names = $Null
    $First = $True
    # Figure out display name for case managers - nicer than their email address
    ForEach ($M in $CaseMembers) {
       If ($First) {
          $Names = $M.Name
          $First = $False }
       Else {
          $Names = $Names, $M.Name -Join ", " }    }
    If ($Case.Status -eq "Closed") {
        $ReportLine = [PSCustomObject]@{
           Case        = $Case.Name
           Status      = $Case.Status
           Created     = $Case.CreatedDateTime
           ClosedBy    = $Case.ClosedBy
           Closed      = $Case.ClosedDateTime
           Members     = $Names    }
        $Report.Add($ReportLine)
        $ClosedCases++   }
   ElseIf ($Case.Status = "Open") {
      $HoldPolicies = (Get-CaseHoldPolicy -Case $Case.Name | % {Get-CaseHoldPolicy $_.Name -Case $_.CaseId -DistributionDetail})
      ForEach ($Hold in $HoldPolicies) {
        $HoldRule = Get-CaseHoldRule -Policy $Hold.Name
        $ActiveHolds++
      $i = 0 # Section of code to highlight inactive mailboxes that are under hold
      $Mbxes = $Null
      $CountMbx = 0
      ForEach ($H in $Hold.ExchangeLocation) {
      $Len = $Hold.ExchangeLocation[$i].DisplayName | Measure-Object -Character | Select -Expandproperty Characters
      If ($Hold.ExchangeLocation[$i].DisplayName.Substring(0,1) -eq ".") {
          $Mbx = ($Hold.ExchangeLocation[$i].DisplayName.Substring(1,$Len - 1)) + " (Inactive); "
          $Mbxes = $Mbxes + $Mbx }
      Else  {
          $Mbxes = $Mbxes + ($Hold.ExchangeLocation[$i].DisplayName) + "; " }
      $CountMbx++
      $i++ }
 #    Write out the report line
      $ReportLine = [PSCustomObject]@{
           Case           = $Case.Name
           Status         = $Case.Status
           Created        = Get-Date ($Case.CreatedDateTime) -format g
           ClosedBy       = $Case.ClosedBy
           Closed         = $Case.ClosedDateTime
           Members        = $Names
           Hold           = $Hold.Name
           HoldEnabled    = $Hold.Enabled
           HoldCreatedby  = $Hold.CreatedBy
           HoldModifiedby = $Hold.LastModifiedBy
           Mailboxes      = $Mbxes
           MailboxCount   = $CountMbx
           SPOSites       = ($Hold.SharePointLocation.Name) -Join ","
           Query          = $HoldRule.ContentMatchQuery
           HoldCreated    = Get-Date($HoldRule.WhenCreatedUTC) -format g
           HoldModifued   = Get-Date($HoldRule.WhenChangedUTC) -format g }
        $Report.Add($ReportLine)
   }
}}
CLS
Write-Host "EDiscovery Cases found: " $Cases.Count
Write-Host "Active Cases:           " ($Cases.Count - $ClosedCases)
Write-Host "Closed Cases:           " $ClosedCases
Write-Host "Active Holds:           " $ActiveHolds
$Report | Sort Status, Case | Format-Table Case, Status, Created, HoldCreated