Je t'ai envoyé un fichier.Il y a une partie de ta solution.
C'est assez simple.
Tu fais une feuille cachée, dans laquelle, tu mettras les formules à ne pas éffacer.
Et pour remplir ton tableau, tu le fais avec la macro suivante :
Private Sub CommandButton1_Click()
Sheets("Feuil1").Range("b8").Value = _
Sheets("Feuil2").Range("d4").Value
End Sub
Tu peux l'adapter, assez facilement, pour plusieurs cellules.
Et voilà, quand tu écriras "0" dans ton tableau, cela ne changera rien à celui-ci.
Voilà, en espérant t'avoir aidé.
Ps : Cette macro me vient de @+Thierry.
@ +
Moa