réinitialiser des cellules à zero

[niko]

Re,

J'ai déjà posé mon problème

J'essaye de mettre des cellules à zero une fois que je quitte.

J'ai essayé un code de Jo qui est certainement à 2 doigts de fonctionner:

private sub workbook_beforeclose
sheets("tafeuille").range("A1:A10").value=0
end sub

Une fois que je compile, message d'erreur qui me dit que la procédure ne correspond à la description de l'évenement.

D'avance je vous remercie

 

[Romuald]

J'ai testé le code suivant et ça fonctionne :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Feuil1").Range("A1:A10").Value = 0
ThisWorkbook.Save
End Sub

Tu n'aurais pas supprimé les paramètres de ta procédure?