Maybe...
strSheetName.Cells(Target.row, Target.Column) = ""
HTH. Dave