How to lock cells with value once the worksheet is activated of opened

[oct2mine]

hi guys,

I would like to find out on how to create a vba code or data validation to lock the cells with value when i open the worksheet.

Example: if cell A1=2 A2=2 then it will automatically locked these two cell everytime i open the worksheet.

Hoping that someone could help me with this.

Thanks in advance

[Blokeman]

Try; Paste this to ThisWorkbook. If macro is not enabled then this won't work.

Please Login or Register  to view this content.

[oct2mine]

Hi Blokeman,

I have tried your code but nothings happened. I can still edit the cell in A1.
Please advise.

Edited:
It works but it also locked the cells without value. what am i supposed to do for this code to locked only cells with value and make the cells without value to be still editable.

Thanks Blokeman

[Blokeman]

Amended the code.

[Blokeman]

Oooops, one more thing you have to unlock all cells.

[oct2mine]

Hi Blokeman,

I've tried the new code and also unlocked all the cell but what happened is it doesn't locked the all the cells with value. is this code works for you?

Thanks

[oct2mine]

i figured it out. thanks so much for your help

[oct2mine]

just a follow up question. what if i want A-AF to be included in this code? i tried this one Range("A:AF") but it doesnt work. do i need to repeat the code per column? or is there a way to put it in range like the one that i am trying to do above?

thanks for your response it really saves my day