Aide sur VBA - date de modification

Bonjour,

J'ai un souci avec VBA. J'ai en fait un classeur excel avec beaucoup de feuilles. Ce que j'aimerai faire, c'est que dès qu'une feuille est modifiée, une date de modification apparaisse sur la feuille modifiée.
J'ai mis ce code :

Dim modif As Boolean
Private Sub Workbook_Open()
modif = False
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If modif = True Then

Sheets("Feuill1").Range("A1").Value = "Date de modification " & Format(Date, _
"dd/mm/yyyy") & " " & Format(Time, "hh:mm") 'c'est là que la date de modif s'affiche
End If
End Sub
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
modif = True
End Sub

Mais le souci c'est qu'avec ce code, n'importe quelle modification sur le classeur change la date de modification, or moi j'aimerai que ce soit une modif sur la dite feuille qui change la date et pas une modif sur le reste du classeur.
Je me tiens à disposition si je n'a pas été assez clair.
Merci d'avance.