lock cells that contains formulas

[Pookiemeister]

Is there a way to lock cells that contain formulas only with vba? I tried doing it the spreadsheet way, going to format cells--->protection tab...etc.. but it ends up locking all the cells on my spreadsheet. I'm wondering if it would be easier using VBA to perform this task. Thank you.

 

[Fluff]

You need to unprotect all the cells first & then select the columns with formulae & set them as locked.