probleme de comppatibilité excel 2010 2003

bonjour le forum,

j'ai plusieurs utilisateurs avec 2 versions excel

j'ai le VBA ci dessous qui fonctionne très bien sous excel 2010 mais sous excel 2003 j'ai une erreur 438 et message suivant "Objet ne gère pas cette propriété ou cette méthode"

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Application.Intersect(Target, Range("A9:AG69")) Is Nothing Then

If Target.CountLarge <> 1 Then Exit Sub

If Target Like "*152" Then Sheets("suivi code").Activate

End If

End Sub

avez vous une soluce ? SVP
merci à vous