Retour Method Range.Replace
Bonjour,
Il y a-t-il un moyen de récupérer le résultat de la methode replace ?
J'ai regardé sur MSDN et a priori elle renvoie un booléen sauf que je n'arrive pas à le coder
Actuellement mon code ressemble à ca :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
| LMax = Worksheets("Transco_Travail").Range("a65536").End(xlUp).Row
'On selectionne la zone de travail
Worksheets("Travail").Activate
For Num = LMax To 2 Step -1
Origine = Worksheets("Transco_Travail").Cells(Num, "A").Value
Transco = Worksheets("Transco_Travail").Cells(Num, "B").Value
Worksheets("Travail").Cells.Replace What:=Origine, Replacement:=Transco
Worksheets("Transco_Travail").Cells(Num, "A").EntireRow.Delete
Next Num |
Je n'aurais aimé supprimer ma ligne que si ma transco a été effectuée hors je n'arrive pas à imbriquer le partie replace dans une condition pour récupérer le résultat.
Est ce que c'est possible ?
Merci