VBA Macro to clear cell contents, but not the formula.

[oblix]

I Have Tried this, but dont get it wright.

Sub Clear_Perm1()
Worksheets("PERMENANT LIVING IN REGISTER").Range("C6:AV447").SpecialCells(xlCellTypeConstants, 23).ClearContents
Range("C1").Select

End Sub

What have I done Wrong?

 

[Fluff]

In what way doesn't it work?

In future please start a thread of your own, I have done that for you this time.

 

[oblix]

Thank you for assistance.
It gives me a runtime error "1004"

 

[Fluff]

What is the error message?

 

[oblix]

will the fact that some cells are protected cause this error?

 

[Fluff]

Depends, you haven't answered my question.

 

[oblix]

Not sure then what the question was
I receive error 1004 message with description "No cells where found"

 

[oblix]

It looks like it only gives this error if all cells are already blank

 

[Fluff]

I would not expect that error if the sheet was protected.
The error is saying that it can't find any cells.