Bonjour à tous,
pas grand chose à expliquer, les noms des variables parlent d'eux-même. Et pour les fonction inconnues, F1 dessus expliquera beaucoup mieux que moi.
2 points quand même :
.SpecialCells(xlCellTypeFormulas)
restreint la plage aux seules cellules avec formule pour limiter le traitement. Inutile de refaire ce qui a déjà été fait.
If Not pl Is Nothing Then pl.Value = pl.Value
: si cette plage résultante n'est pas vide on colle les valeurs.
eric