Compile 3 Macros into 1 (Unprotect > Run Loop > Protect)

I have a macro that runs a loop on most sheets to clear colored cells. All worksheets are protected and I can't seem to integrate my protect and unprotect macros (which work!) into the clearing macro. Here are all 3:


Clear cells

Please Login or Register  to view this content.

Unprotect all sheets

Please Login or Register  to view this content.

Protect all sheets

Please Login or Register  to view this content.

How can I integrate the 1. unprotect all sheets, 2. run clear macro, and 3. protect all sheets?

Note that "UserInterfaceOnly:=True" does not consistently work. It fails when the workbook is opened having been previously protected..

Thanks, that's simple! However, it seems to operate a bit clunky .. I'm not sure that the macros are working in the correct order. It asks to unprotect, then protect, then it seems as if it clears..?

Norie,

I adjusted your code but still, the process goes as follows:

1. asks me to unprotect

2. asks me to protect

3. clears all blue cells

Please Login or Register  to view this content.

You'll notice that I added " Range("C3").Value = DateAdd("d", 7, Range("C3").Value)" but that doesn't seem to be the issue. I don't think.

Have you had a chance to check out the attached workbook, Norie?