Unprotect, Execute Code, Reapply Protection for Multiple Sheets

[catnam]

Hi and thanks in advance for you help.

I have a workbook with multiple budget worksheet. In module 1 I have code to copy data from JANBUDGET to all the other budgets. All the worksheet are protected. I've figured out how to do what title of this post indicate what I want to do, but want to know if there is a more efficient way of doing this. I don't want to have 11 unprotect lines of code, then another 11 to reapply protection to FEB to DEC budget. I've attached the workbook. Can anyone tell me or modify the code to unprotect and re-protect all the budgets with fewer lines of code. I've enter the unprotect and re-protect lines for FEB and MAR, but don't want to do this for each budget.

Catnap