Bonjour à toutes te à tous,
Je souhaite un code qui permet de remplacer un texte en fonction d'une cellule. Pour être plus claire voici un exemple et le fichier en PJ
Dans l'onglet "Synthèse", j'ai dans la case D2 une valeur ramenée de l'onglet "A TEST1" avec une formule "égale" basique.
Ma macro permet d'ajouter une ligne et de copier la ligne du dessus (celle déjà existante), et le but c'est que la formule de la case D3 ramène la valeur de l'onglet "B TEST2"
Pour cela, manuellement, il suffit de remplacer, dans la cellule, la formule "='A TEST1'!A1" par "='B TEST2'!A1"
J'ai essayé avec "Selection.Replace What:=ActiveCell.Offset(-1, 1).contents, Replacement:=ActiveCell.Offset(0, 1).contents" mais ça ne marche pas
La contrainte que l'on ne voit pas dans le fichier en PJ, est le fait que l'onglet synthèse contient plus de colonnes de données à ramener des feuilles. De plus, la ligne copiée n'est jamais la même. C'est toujours la dernière qui est copiée. Donc, la formule bouge aussi.
Merci par avance, en espérant que c'est assez claire.