Lock entire column if data has been entered in it

Hi,
I'm looking for a way to auto lock entire column if data is entered in it and after the workbook is closed.
So in the attached file there is a range of cells (C3:M28; C31:M31; C34:M34) which are unlocked. Is there a way to lock cells in the entire column "C" (after I close and save the workbook) if data is entered in any unlocked cell in this column? Respectively lock the entire column "D" if data is entered in any cell in it, and so forth.

Sorry if my English is bad and if my question is previously answered but I couldn't find a solution!
Thanks in advance!
Best regards!

Book1.xlsx

Your sheet is protected with a password. Could you post the password?

Try this macro. Change "password" in the code to match yours.

Please Login or Register  to view this content.

Do the following: Hold down the ALT key and press the F11 key. This will open the Visual Basic Editor. In the menu at the top click 'Insert' and then click 'Module'. Copy and paste the macro into the empty code window that opens up. Press the F5 key to run the macro. Close the code module window to return to your sheet. There are other quicker ways to run the macro such as assigning it to a button that you would click on your sheet or assigning it to a short cut key.

My pleasure.