Copier une formule en remplacant un nom de feuille

Salut M.Charlotte


Si si la fonction remplacer marche très bien sur les formules il suffit de faire deux/trois petites choses simples

Aavnt toute chose => Sélectionner la plage concernée puis :
1) Appeler cet outil par Menu / Rechercher... (pas par Remplacer...)
2) De basculer "Rechercher dans" => "Formules" (et pas valeur)
3) De taper "Site1" dans "Chercher"
4) De lancer le remplacement avec le bouton prévu à droite...
5) De taper "Site2" dans "Remplacer"

Comme çà tu peux le faire... ou alors en VBA ...

Et juste pour l'exercice... je me le suis tapé en VBA ... (attention c'est juste pour l'exercice, faut compléter la macro avec les ranges à couvrir etc les variables ... mais disons que ce serait peut utile pour toi... ne connaissant pas ton niveau...)

Sub ChercheRemplace()
Chercher = InputBox("FORMULE A CHERCHER")
remplacer = InputBox("FORMULE A REMPLACER")
Cells.Replace What:=Chercher, Replacement:=remplacer, Lookat:=xlPart
End Sub

Bon après midi
@+Thierry