MsgBox en fermeture du fichier sous condition

Bonjour
Mon soucis
Avant la fermeture du fichier je souhaite;
1) faire apparaitre un message si la valeur de la cellule L2 de la feuille1 est supérieure à 0 (indice d'anomalie dans le renseignement du fichier),
2) empécher la fermeture.
Si la valeur de la cellule est égale à 0 alors le fichier peut se fermer

j'ai essayé BeforeClose mais sans succès, je bute sur la syntaxe sur l'adresse de la cellule

merci de votre aide

Bonjour,

Teste avec ceci :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub Workbook_BeforeClose(Cancel As Boolean)   If Worksheets("Feuil1").Range("L2").Value <> 0 Then   MsgBox "indice d'anomalie dans le renseignement du fichier !" Cancel = True   End If   End Sub

---

Hervé.

Merci,
Ca fonctionne, je viens de voir qu'il s'agissait d'une cellule fusionnée, et dans ce cas là la macro se plante

merci de ton aide