Clear contents - no formulas

[Lukael]

Hello,

I have a macro for clearing contents after copying first sheet and creating new ones. VBA code is for clearing contents, but to leave all formulas within range intact.

Code is :

Please Login or Register  to view this content.

Code works when there are actually some cells to clear, but If none (cells are clear - except formula cells) I receive error "no cells were found". How can I fix that, I want this code only to delete cells If user accidently types something in first sheet which is being copied.

Tried this but not working :

Please Login or Register  to view this content.

[ragulduy]

Please Login or Register  to view this content.

[Lukael]

thanks for response,

but I still get error: "no cells found"

[AlphaFrog]

Try this...

Please Login or Register  to view this content.

[ragulduy]

Sorry, you are right, error handling like that doesn't work in a loop. Try this:

Please Login or Register  to view this content.

[Lukael]

AlphaFrog,

your code works

Thanks man, nicely done !

[Solus Rankin]

Another option would be to use a "cheater" cell that will always maintain a constant by writing to it in code.

[Lukael]

Thanks Solus,

I actually had that (on sheet - not VBA) but I rather prefer AlphaFrog's code, It's more correct.