[Enzobob]

Bonsoir Francky

Je ne sais pas si j'ai compris ce que tu souhaite,
as tu essayé ca,

Private Sub Worksheet_Activate()
Dim tmp As Integer

tmp = Range('A2')
Range('a2') = tmp + Range('A1')

End Sub
la macro ne tourne pas en boucle, mais uniquement quand tu active la feuille où tu veux ton résultat.

A +