Code ne fonctionne pas
Bonjour,
Je souhaite appliquer ce code sur mon tableau excel CLASSEUR 2 mais rien ne se passe.
Ci-joint les 2 fichiers en question.
Pouvez-vous m'aider svp?
# Opening an existing Excel document
$Excel = New-Object -ComObject excel.application
$Excel.visible = $True #Excel will be visible
$Tableau_Origine = $excel.Workbooks.open("C:\Users\nou.xiong\Desktop\CLASSEUR1.xls")
$Nom_Feuillle_Origine = $Tableau_Origine.WorkSheets.item("A")
$Nom_Feuillle_Origine.activate()
$Tableau_Cible = $excel.Workbooks.open("C:\Users\nou.xiong\Desktop\CLASSEUR2.xls")
$Nom_Feuillle_Cible = $Tableau_Cible.WorkSheets.item("A")
$Nom_Feuillle_Cible.activate()
$colonne_Test_Origine = 4
$colonne_Donnee_Origine = 16
$colonne_Test_Cible = 4
$colonne_Donnee_Cible = 16
$intRowMax = ($Nom_Feuillle_Origine.UsedRange.Rows).count
$intRowMax2 = ($Nom_Feuillle_Origine2.UsedRange.Rows).count
for($intRow = 4 ; $intRow -le $intRowMax ; $intRow++)
{
$Facture = $Nom_Feuillle_Origine.Cells.Item($intRow,$colonne_Test_Origine).Value()
for($intRow2 = 4 ; $intRow2 -le $intRowMax2 ; $intRow2++)
{
if($Facture -eq $Nom_Feuillle_Cible.Cells.Item($intRow2,$colonne_Test_Cible).Value())
{
$Nom_Feuillle_Cible.Cells.Item($intRow2,$colonne_Donnee_Cible).Value() = $Nom_Feuillle_Origine.Cells.Item($intRow,$colonne_Donnee_Origine).Value()
}
}
}
$Tableau_Origine.Close()
Read-Host