Einfache Liste der Office365-Geräte

Get-MGUser -All | select Displayname,Mail,RegisteredDevices,OwnedDevices

#requires -Modules Microsoft.Graph.Users
# path to save the report to
$EXPORTPATH = '.\office_activations.csv'  
# set your desired browser, valid values are "Firefox","Chrome" or "Edge" (the browser must be installed on the current system!) 
$selenium_browser = 'Firefox'  
# --------------------------------------
$ErrorActionPreference = "Stop"  
if ($host.Version.Major -ne 5){
    throw "PowerShell Version 5 required."  
    return
}
# function to create selenium browser
function Create-Browser {
    param(
        [Parameter(mandatory=$true)][ValidateSet('Chrome','Edge','Firefox')][string]$browser,  
        [Parameter(mandatory=$false)][bool]$HideCommandPrompt = $true,
        [Parameter(mandatory=$false)][string]$driverversion = ''  
    )
    $driver = $null

    function Load-NugetAssembly {
	    [CmdletBinding()]
	    param(
		    [string]$url,
		    [string]$name,
		    [string]$zipinternalpath,
		    [switch]$downloadonly
	    )
	    if($psscriptroot -ne ''){  
		    $localpath = join-path $psscriptroot $name
	    }else{
		    $localpath = join-path $env:TEMP $name
	    }
	    $tmp = "$env:TEMP\$([IO.Path]::GetRandomFileName())"  
	    $zip = $null
	    try{
		    if(!(Test-Path $localpath)){
			    Add-Type -A System.IO.Compression.FileSystem
			    write-host "Downloading and extracting required library '$name' ... " -F Green -NoNewline  
			    (New-Object System.Net.WebClient).DownloadFile($url, $tmp)
			    $zip = [System.IO.Compression.ZipFile]::OpenRead($tmp)
			    $zip.Entries | ?{$_.Fullname -eq $zipinternalpath} | %{
				    [System.IO.Compression.ZipFileExtensions]::ExtractToFile($_,$localpath)
			    }
			    write-host "OK" -F Green  
		    }
		    if (Get-Item $localpath -Stream zone.identifier -ea SilentlyContinue){
			    Unblock-File -Path $localpath
		    }
		    if(!$downloadonly.IsPresent){
			    Add-Type -Path $localpath -EA Stop
		    }
	    }catch{
		    throw "Error: $($_.Exception.Message)"  
	    }finally{
		    if ($zip){$zip.Dispose()}
		    if(Test-Path $tmp){del $tmp -Force -EA 0}
	    }
    }

    # Load Selenium Webdriver .NET Assembly
    Load-NugetAssembly 'https://www.nuget.org/api/v2/package/Selenium.WebDriver/4.11.0' -name 'WebDriver.dll' -zipinternalpath 'lib/net45/WebDriver.dll' -EA Stop  

    if($psscriptroot -ne ''){  
        $driverpath = $psscriptroot
    }else{
        $driverpath = $env:TEMP
    }
    switch($browser){
        'Chrome' {  
            $chrome = Get-Package -Name 'Google Chrome' -EA SilentlyContinue | select -F 1  
            if (!$chrome){
                throw "Google Chrome Browser not installed."  
                return
            }
            Load-NugetAssembly "https://www.nuget.org/api/v2/package/Selenium.WebDriver.ChromeDriver/$driverversion" -name 'chromedriver.exe' -zipinternalpath 'driver/win32/chromedriver.exe' -downloadonly -EA Stop  
            # create driver service
            $dService = [OpenQA.Selenium.Chrome.ChromeDriverService]::CreateDefaultService($driverpath)
            # hide command prompt window
            $dService.HideCommandPromptWindow = $HideCommandPrompt
            # create driver object
            $driver = New-Object OpenQA.Selenium.Chrome.ChromeDriver $dService
        }
        'Edge' {  
            $edge = Get-Package -Name 'Microsoft Edge' -EA SilentlyContinue | select -F 1  
            if (!$edge){
                throw "Microsoft Edge Browser not installed."  
                return
            }
            Load-NugetAssembly "https://www.nuget.org/api/v2/package/Selenium.WebDriver.MSEdgeDriver/$driverversion" -name 'msedgedriver.exe' -zipinternalpath 'driver/win64/msedgedriver.exe' -downloadonly -EA Stop  
            # create driver service
            $dService = [OpenQA.Selenium.Edge.EdgeDriverService]::CreateDefaultService($driverpath)
            # hide command prompt window
            $dService.HideCommandPromptWindow = $HideCommandPrompt
            # create driver object
            $driver = New-Object OpenQA.Selenium.Edge.EdgeDriver $dService
        }
        'Firefox' {  
            $ff = Get-Package -Name "Mozilla Firefox*" -EA SilentlyContinue | select -F 1  
            if (!$ff){
                throw "Mozilla Firefox Browser not installed."  
                return
            }
            Load-NugetAssembly "https://www.nuget.org/api/v2/package/Selenium.WebDriver.GeckoDriver/$driverversion" -name 'geckodriver.exe' -zipinternalpath 'driver/win64/geckodriver.exe' -downloadonly -EA Stop  
            # create driver service
            $dService = [OpenQA.Selenium.Firefox.FirefoxDriverService]::CreateDefaultService($driverpath)
            # hide command prompt window
            $dService.HideCommandPromptWindow = $HideCommandPrompt
            # create driver object
            $driver = New-Object OpenQA.Selenium.Firefox.FirefoxDriver $dService
        }
    }
    return $driver
}

# connect to MG
Connect-MGGraph -Scopes User.Read.All

write-host "Script will now open a webbrowser instance, please login to the M365 Admin-Center with your credentials.`nScript will wait until you finish the login.`n`nPress any key to continue" -F Green  
[void][console]::ReadKey()

# create selenium browser instance
$browser = Create-Browser -browser $selenium_browser
# Navigate to admin center
$browser.Url = "https:/admin.microsoft.com"  
$browser.Navigate()
# wait until user has finished login procedure
do {
    write-host "Waiting for login to complete ..." -F Cyan  
    sleep 1
}until($browser.url -like 'https://admin.microsoft.com/Adminportal/Home#/*')  
write-host "Login completed. Extracting statistics for users, please wait ..." -F Green  
# for each user call api function to get office-install statistics
$result = foreach ($user in Get-MGUser -All){
    try{
        $browser.url = "https://admin.microsoft.com/admin/api/users/$($user.id)/officeInstalls"  
        ([xml]$browser.PageSource).ManageOfficeInstallsModel.SoftwareMachineDetails.SoftwareMachineDetails.MachineDetails.Machines.OlsMachineDetail | select @{n='Username';e={$user.DisplayName}},MachineName,MachineOS,OfficeMajorVersion,LastLicenseRequestedDate,LicenseExpiryDate,LicenseStatus,MachineKey,MachineStatus  
    }catch{}
}
# export statistics to csv
$result | export-csv -LiteralPath $EXPORTPATH -Delimiter ";" -NoTypeInformation -Encoding UTF8 -verbose  
# quit browser and disconnect MG
$browser.Quit()
Disconnect-MgGraph | out-null

"Username";"MachineName";"MachineOs";"OfficeMajorVersion";"LastLicenseRequestedDate";"LicenseExpiryDate";"LicenseStatus";"MachineKey";"MachineStatus"  
"Max Muster";"PC#11";"Microsoft Windows 10 Enterprise";"16";"2023-08-02T07:59:23.122043Z";"1900-01-01T00:00:00Z";"1";"EWW_xxxxxxxxxxxxxxxxxxxxxxxxxxx";"1"  
"Ariane Musterfrau";"PC#12";"Microsoft Windows 10 Enterprise";"16";"2023-08-01T07:59:24.6377168Z";"1900-01-01T00:00:00Z";"1";"EWW_xxxxxxxxxxxxxxxxxxxxxxxxx";"1"  

Install-Module -Name Microsoft.Graph.Users