BonjourFrancky, le forum,
il faut faire stocker le contenu de A2 par Vba puis réutiliser la valeur dans le calcul
par exemple :
Sub Macro1()
Dim tmp As Integer
tmp = Range('A2')
Range('a2') = tmp + Range('A1')
End Sub
en espérant avoir répondu à ta question
Bon courrage et à bientôt.