Powershell 在单独的列中导出365个用户邮箱大小和单位

我有很好的脚本，可以将365个用户邮箱大小导出为csv文件

结果如下：

今天，它在同一列中以KB/MB/GB为单位显示总大小

至于总大小字节，我真的不需要那个列

所以，我想把totalsize列分为两列，分别是Size列和Unit列

就像这样：

因此，最终结果将是：

代码如下：

Param(
    [Parameter(Mandatory = $false)]
    [switch]$MFA,
    [switch]$SharedMBOnly,
    [switch]$UserMBOnly,
    [string]$MBNamesFile,
    [string]$UserName,
    [string]$Password
)

Function Get_MailboxSize{
    $Stats=Get-MailboxStatistics -Identity $UPN
    $IsArchieved=$Stats.IsArchiveMailbox
    $ItemCount=$Stats.ItemCount
    $TotalItemSize=$Stats.TotalItemSize
    $TotalItemSizeinBytes= $TotalItemSize –replace “(.*\()|,| [a-z]*\)”, “”
    $TotalSize=$stats.TotalItemSize.value -replace "\(.*",""
    $DeletedItemCount=$Stats.DeletedItemCount
    $TotalDeletedItemSize=$Stats.TotalDeletedItemSize

    #Export result to csv
    $Result=@{'Display Name'=$DisplayName;'User Principal Name'=$upn;'Mailbox Type'=$MailboxType;'Primary SMTP Address'=$PrimarySMTPAddress;'IsArchieved'=$IsArchieved;'Item Count'=$ItemCount;'Total Size'=$TotalSize;'Total Size (Bytes)'=$TotalItemSizeinBytes;'Deleted Item Count'=$DeletedItemCount;'Deleted Item Size'=$TotalDeletedItemSize;'Issue Warning Quota'=$IssueWarningQuota;'Prohibit Send Quota'=$ProhibitSendQuota;'Prohibit send Receive Quota'=$ProhibitSendReceiveQuota}
    $Results= New-Object PSObject -Property $Result  
    $Results | Select-Object 'Display Name','User Principal Name','Mailbox Type','Primary SMTP Address','Item Count','Total Size','Total Size (Bytes)','IsArchieved','Deleted Item Count','Deleted Item Size','Issue Warning Quota','Prohibit Send Quota','Prohibit Send Receive Quota' | Export-Csv -Path $ExportCSV -Notype -Append 
}

Function main(){
    #Check for EXO v2 module inatallation
    $Module = Get-Module ExchangeOnlineManagement -ListAvailable
    if($Module.count -eq 0){ 
        Write-Host Exchange Online PowerShell V2 module is not available  -ForegroundColor yellow  
        $Confirm= Read-Host Are you sure you want to install module? [Y] Yes [N] No 
        if($Confirm -match "[yY]") { 
            Write-host "Installing Exchange Online PowerShell module"
            Install-Module ExchangeOnlineManagement -Repository PSGallery -AllowClobber -Force
        } 
        else { 
            Write-Host EXO V2 module is required to connect Exchange Online.Please install module using Install-Module ExchangeOnlineManagement cmdlet. 
            Exit
        }
    } 

    #Connect Exchange Online with MFA
    
    if($MFA.IsPresent){
        Connect-ExchangeOnline
    }

    #Authentication using non-MFA

    else{
        #Storing credential in script for scheduling purpose/ Passing credential as parameter
        if(($UserName -ne "") -and ($Password -ne "")){
            $SecuredPassword = ConvertTo-SecureString -AsPlainText $Password -Force
            $Credential  = New-Object System.Management.Automation.PSCredential $UserName,$SecuredPassword
        }
        else{
            $Credential=Get-Credential -Credential $null
        }
        Connect-ExchangeOnline -Credential $Credential
    }

    #Output file declaration 
    $ExportCSV=".\MailboxSizeReport_$((Get-Date -format yyyy-MMM-dd-ddd` hh-mm` tt).ToString()).csv" 

    $Result=""   
    $Results=@()  
    $MBCount=0
    $PrintedMBCount=0
    Write-Host Generating mailbox size report...

    #Check for input file
    if([string]$MBNamesFile -ne "") { 
        #We have an input file, read it into memory 
        $Mailboxes=@()
        $Mailboxes=Import-Csv -Header "MBIdentity" $MBNamesFile
        foreach($item in $Mailboxes){
            $MBDetails=Get-Mailbox -Identity $item.MBIdentity
            $UPN=$MBDetails.UserPrincipalName  
            $MailboxType=$MBDetails.RecipientTypeDetails
            $DisplayName=$MBDetails.DisplayName
            $PrimarySMTPAddress=$MBDetails.PrimarySMTPAddress
            $IssueWarningQuota=$MBDetails.IssueWarningQuota -replace "\(.*",""
            $ProhibitSendQuota=$MBDetails.ProhibitSendQuota -replace "\(.*",""
            $ProhibitSendReceiveQuota=$MBDetails.ProhibitSendReceiveQuota -replace "\(.*",""
            $MBCount++
            Write-Progress -Activity "`n     Processed mailbox count: $MBCount "`n"  Currently Processing: $DisplayName"
            Get_MailboxSize
            $PrintedMBCount++
        }
    }

    #Get all mailboxes from Office 365
    else{
        Get-Mailbox -ResultSize Unlimited | foreach {
            $UPN=$_.UserPrincipalName
            $Mailboxtype=$_.RecipientTypeDetails
            $DisplayName=$_.DisplayName
            $PrimarySMTPAddress=$_.PrimarySMTPAddress
            $IssueWarningQuota=$_.IssueWarningQuota -replace "\(.*",""
            $ProhibitSendQuota=$_.ProhibitSendQuota -replace "\(.*",""
            $ProhibitSendReceiveQuota=$_.ProhibitSendReceiveQuota -replace "\(.*",""
            $MBCount++
            Write-Progress -Activity "`n     Processed mailbox count: $MBCount "`n"  Currently Processing: $DisplayName"
            if($SharedMBOnly.IsPresent -and ($Mailboxtype -ne "SharedMailbox")){
                return
            }
            if($UserMBOnly.IsPresent -and ($MailboxType -ne "UserMailbox")){
                return
            }  
            Get_MailboxSize
            $PrintedMBCount++
        } 
    }

    #Open output file after execution 
    If($PrintedMBCount -eq 0){
        Write-Host No mailbox found
    }
    else{
        Write-Host `nThe output file contains $PrintedMBCount mailboxes.
        if((Test-Path -Path $ExportCSV) -eq "True"){
            Write-Host `nThe Output file available in $ExportCSV -ForegroundColor Green
            $Prompt = New-Object -ComObject wscript.shell   
            $UserInput = $Prompt.popup("Do you want to open output file?",0,"Open Output File",4)   
            If ($UserInput -eq 6){
                Invoke-Item "$ExportCSV"   
            } 
        }
    }
    #Disconnect Exchange Online session
    Disconnect-ExchangeOnline -Confirm:$false | Out-Null
}
. main

可以使用-csplit区分大小写-split按单位拆分TotalItemSize值。这将创建一个包含三个项目的数组。第三项是要替换的字节值

$Stats=Get-MailboxStatistics -Identity $UPN
$TotalItemSize,$Unit = $Stats.TotalItemSize.Value -csplit '(\b[A-Z]+\b)').Trim()[0,1]

$Unit现在将包含该单位，$TotalItemSize将包含不包含该单位的大小。修剪是从格式中删除周围的空格

从技术上讲，您可以使用一条线完成所有尺寸操作：

$TotalItemSize,$Unit,$TotalSizeInBytes = ($Stats.TotalItemSize.Value -split ' ' -replace '\(|,')[0,1,2]

可以使用-csplit区分大小写-split按单位拆分TotalItemSize值。这将创建一个包含三个项目的数组。第三项是要替换的字节值

$Stats=Get-MailboxStatistics -Identity $UPN
$TotalItemSize,$Unit = $Stats.TotalItemSize.Value -csplit '(\b[A-Z]+\b)').Trim()[0,1]

$Unit现在将包含该单位，$TotalItemSize将包含不包含该单位的大小。修剪是从格式中删除周围的空格

从技术上讲，您可以使用一条线完成所有尺寸操作：

$TotalItemSize,$Unit,$TotalSizeInBytes = ($Stats.TotalItemSize.Value -split ' ' -replace '\(|,')[0,1,2]

替换行：

$Results | Select-Object 'Display Name','User Principal Name','Mailbox Type','Primary SMTP Address','Item Count','Total Size','Total Size (Bytes)','IsArchieved','Deleted Item Count','Deleted Item Size','Issue Warning Quota','Prohibit Send Quota','Prohibit Send Receive Quota' | Export-Csv -Path $ExportCSV -Notype -Append

与：

我已将“总尺寸”替换为以下两个计算属性：

@{Name = 'Total Size'; Expression = {($_."Total Size").Split(" ")[0]}}
@{Name = 'Unit'; Expression = {($_."Total Size").Split(" ")[1]}}

这会将值拆分为一个数组，并将它们放入指定的Total Size&Unit属性中

替换行：

$Results | Select-Object 'Display Name','User Principal Name','Mailbox Type','Primary SMTP Address','Item Count','Total Size','Total Size (Bytes)','IsArchieved','Deleted Item Count','Deleted Item Size','Issue Warning Quota','Prohibit Send Quota','Prohibit Send Receive Quota' | Export-Csv -Path $ExportCSV -Notype -Append

与：

我已将“总尺寸”替换为以下两个计算属性：

@{Name = 'Total Size'; Expression = {($_."Total Size").Split(" ")[0]}}
@{Name = 'Unit'; Expression = {($_."Total Size").Split(" ")[1]}}

---

这会将值拆分为一个数组，并将它们放入指定的Total Size&Unit属性中

标记原始源很好：标记原始源很好：