Pb. macro

Bonjour,

J'ai récupéré ce code VBA que je trouve intéressant ,mais j'aurais voulu limité son action a une certaine plage défini dans cette macro.

problème je n'y arrive pas ,si quelqu'un pouvait m'aider

'Empecher la sélection des cellules contenant des formules
'procédure évenementielle , à placer au niveau de la feuille
Private Sub Worksheet_selectionChange(ByVal Target As Range)
Dim Cell As Range
For Each Cell In Selection
If Cell.HasFormula Then Selection.Cells(1, 1).Offset(, 1).Select
Next
End Sub

D'avance merci