Bonjour le forum et à ceux qui sont intervenus sur le sujet
Il faut modifier la macro AjoutAnnee ainsi
Merci gmb d'avoir participé au sujet
Bon WE a tous
[code]Range("G4:G15").Formula = "=IF('Année " & An1 & "'!H4>0,'Année " & An1 & "'!H4,0)"
Range("J4:J15").Formula = "=IF(H4=0,0,(H4-('Année " & An1 & "'!H10)))"
[/code]