VBA: remplacer un caractére dans une formule

Bonjour,

j'au une formule (mettons stockée dans la cellule A2 =2*A1) et je voudrais créer une boucle qui, pour chaque i de 2 To 10, applique la formule A2 non pas à A1 mais à Ai.

En d'autres termes, je voudrais que VBA remplace tout seul A1 par A2, puis A3, puis A4, etc... jusau'à 10.

J'ai voudrais du VBA et pas simplement "glisser" la formule de A1 vers les cellules suivantes. Je sais faire la boucle mais pas la commande pour remplacer A1 par Ai.

Merci d'avance

Bonjour,

par exemple

for i=2 to 10

f=cells(i,2).formula
cells(i,2).formula=replace(f,"A1","A" & i)

next i