Could you please tel me why this wouldn't work

Sheets("a lap").Range(Cells(Target.Row, MaxCol + 4), Cells(Target.Row, _
256)).ClearContents

I'm running it from some code in a sheet called A grade if that makes a
difference.
Maxcol is dim as integer.

Thanks