Untitled

 avatar
unknown
plain_text
2 years ago
1.6 kB
3
Indexable
$server = "192.168.1.212" #Adresse du serveur AD
$DN = (get-addomain -Server $server).dnsroot

$commun = "\\192.168.1.212\commun\01_Espace Collaboratif\01_Projets-Systemes-Direction" # Emplacement du fichier Excel à importer
Set-Location $commun # On se place dedans

$Excel = Open-ExcelPackage -Path '.\Personnels.xlsx' # La variable $Excel ouvre le fichier Excel Personnels
$O_Registre = $Excel.Workbook.Worksheets['Registre'] # On se place sur l'onglet contenant la liste du personnel
$Raw_Names = $O_Registre.SelectedRange['C2:C350'].Value # Valeur des Noms et Prénoms 
#$Raw_Names = $O_Registre.SelectedRange['C2:C12'].Value
 

Foreach ($fullname in $Raw_Names) {

$nom,$prenom = $fullname.split(" ") 
#Write-Host $prenom
$SAM = ($prenom.substring(0,1)+"."+$nom).ToLower()

if(!(Get-ADUser -Server $server -Filter {samaccountname -eq $SAM})){ # Test si l'utilisateur n'existe pas

    Write-Host "Création de $SAM !" -ForegroundColor Green # Alors on le créé

    New-ADUser  -Server $server `
                -Name "$prenom $nom" `
                -DisplayName "$nom $prenom" `
                -GivenName "$prenom" `
                -Surname "$nom" `
                -SamAccountName $SAM `
                -UserPrincipalName $SAM+"@"+$DN `
                -Path "OU=sansgroupe,OU=Employes,OU=GPA,DC=gpa,DC=local" `
                -AccountPassword (ConvertTo-SecureString ("Gpa1"+($nom).ToLower()+"!") -AsPlainText -Force) `
                -ChangePasswordAtLogon $true `
                -Enabled $true
    
    } else { # Sinon ne fait rien
    Write-Host "$SAM existe déjà !" -ForegroundColor Red 
    }
}
Editor is loading...