Hi,

Wonder if someone can help me please.

I have a spreadsheet with cells that look blank, they have do visible data
or formula in them however, when I run a macro to try and copy cells into
them, it fails.

I have therefore looked at just running a bit of code that within a given
range where it finds a blank cell it deletes the content.

Could someone have a look at the code below that I am using to see where i I
am going wrong because it doesn't seem to work.

Sub Delete_Cell_Contents()

Range("A2:I65536").Select
If Value = "" Then
Selection.ClearContents
End If

End Sub


Thanks very much

Chris