I've tried recording a macro for this, but it seems to lose something in the VBA

Basically, I want a macro that I can use on any sheet (so will live in my PERSONAL file) that will delete the contents of all non protected cells within the active worksheet. I do not need (or want) to specify a range.

If it's possible to have a version that will cycle through all worksheets with the workbook, great, but I'll be happy with just the active sheet.

Thanks as always