powershell_randon_scripts

###########Alterar depto com base em CSV
Install-Module -Name AzureAD
Connect-AzureAD
Import-Csv -Path “c:\temp\users.csv” -Delimiter ";" | ForEach-Object {
Set-AzureADUser -ObjectId $_.’Conta’ -Department $_.'Dpto'

}



########### exporta grupos de distribuição com membros
Install-Module ExchangeOnlineManagement
Connect-ExchangeOnline

$Result=@()
$groups = Get-DistributionGroup -ResultSize Unlimited
$totalmbx = $groups.Count
$i = 1
$groups | ForEach-Object {
Write-Progress -activity "Processing $_.DisplayName" -status "$i out of $totalmbx completed"
$group = $_
Get-DistributionGroupMember -Identity $group.Name -ResultSize Unlimited | ForEach-Object {
$member = $_
 $Result += New-Object PSObject -property @{
GroupName = $group.DisplayName
Member = $member.Name
EmailAddress = $member.PrimarySMTPAddress
RecipientType= $member.RecipientType
}}
$i++
}
$Result | Export-CSV "C:\\All-Distribution-Group-Members.csv" -NoTypeInformation -Encoding UTF8




########### desativar certos Apps no O365 de acordo com a Licença

#Get-MsolAccountSku | Select AccountSkuId | Sort AccountSkuId

$LO = New-MsolLicenseOptions -AccountSkuId "reseller-account:ENTERPRISEPACK" -DisabledPlans "EXCHANGE_S_ENTERPRISE", "TEAMS1"

Import-Csv -Path “c:\temp\users_disable.csv” | ForEach-Object {

Write-Output "Processing $_.mail"
Set-MsolUserLicense -UserPrincipalName $_.'mail' -LicenseOptions $LO

}




########### Remover licença através de uma lista csv NAO FUNCIONA MAIS EM 24/10/2024 
Import-Csv -Path “c:\temp\bulk.csv” | ForEach-Object { 
Write-Output "Processing $_.mail"
$MsolUser = Get-MsolUser -UserPrincipalName  $_.mail

$AssignedLicenses = $MsolUser.licenses.AccountSkuId
foreach($License in $AssignedLicenses) {
    Set-MsolUserLicense -UserPrincipalName  $_.mail -RemoveLicenses $License
}
}

###########Remove All User Licenses and disable users from csv (csv with username only)

Connect-MgGraph -Tenant aaa.onmicrosoft.com -Scopes User.ReadWrite.All
$users = Import-Csv c:\temp\users_o3656_removal.csv
#$users = Get-MgUser -Filter "Department eq 'Marketing'"
 
foreach ($user in $users) {
$user = $user.UserPrincipalName + "@aaa.onmicrosoft.com"
    Write-Host "Processing licenses for user $user"
    try { $user = Get-MgUser -UserId $user }
    catch { Write-Host "User $user not found, skipping..." ; continue }
    Update-Mguser -UserId $user.id -AccountEnabled:$false
    $SKUs = @(Get-MgUserLicenseDetail -UserId $user.id)
    if (!$SKUs) { Write-Host "No Licenses found for user $user, skipping..." ; continue }
 
    foreach ($SKU in $SKUs) {
       Write-host ">>>>>> Removing license from user $user"  
       Set-MgUserLicense -UserId $user.id -AddLicenses @() -RemoveLicenses $Sku.SkuId
       
       }
}


###########Colocar sharepoint em ReadOnly através de uma lista .csv
# https://www.sharepointdiary.com/2019/02/set-sharepoint-online-site-to-read-only-using-powershell.html
$AdminCenterURL="https://SITE-admin.sharepoint.com/"
 
#Connect to SharePoint Online
Connect-SPOService -Url $AdminCenterURL

Import-Csv -Path “c:\temp\sharepoint_ro.csv” | ForEach-Object {

Write-Output "Processing $_.SP"

###########PowerShell to set sharepoint online site to read only
Set-SPOSite -Identity $_.'SP' -LockState ReadOnly
}


#Pegar infos dos Sites no Sharepoint
Get-SPOSite  | select URl, Title, LockState,LastContentModifiedDate | Format-table

#Instalar e conectar MSOL
Install-Module MSOnline
Connect-MsolService 





###########Bulk add users in sharepoints from csv with "mail;site url"
##Connection paramaters
$AdminURL = "https://loftms365-admin.sharepoint.com"
$CSVFile="c:\temp\sharepoint-focalpoints-01.csv"

#Connect to SharePoint Online
#Connect-SPOService -url $AdminURL
 

Import-Csv $CSVFile | ForEach-Object { Set-SPOUser -LoginName $_.mail -IsSiteCollectionAdmin $true -Site $_.site}