Locking Cell After Specified Date

Hi all.

I've been trying all sorts of macros code from various searches but can't get any to work.


See attached spreadsheet. Basically once the month of May has passed cell B7 should be locked. After the month of June cell C7 should be locked, and so on...

The password for the sheet is "password"

Can anyone help ASAP?

Thanks.

R.

Try this!

I put

Please Login or Register  to view this content.

above the cells you want to lock. Then above that formula i put

Please Login or Register  to view this content.

so the macro compares the numbers...if the one on the bottom is smaller it locks the cell.

Thanks GF but what you have done only works if the worksheet is unprotected.

The worksheet will always be locked with the password.

Can you make it unprotect the worksheet, run the macros and then reprotect the worksheet?

Also can the macros run when the worksheet/workbook is saved? (and not have to use a button)

Thanks.

R.

go into the macro and add

Please Login or Register  to view this content.

at the very beginning

Please Login or Register  to view this content.

at the very end

Here you go i made it run when saving, also did the protection thing for you

Thanks again GF.

I have moved a few things about (see attached) and get the following problem,

When i enter the data on the "Profit Take-Up" tab in "Cell B7" then save and close it all works fine. But if i enter the data in the same cell then move to sheet 1 and try to save and close I get an error.

One other thing aswell, now that i have made the cells unselectable if protected, will this effect the macros next month? or the months to come?

Any ideas?

Thanks.

R.

Hi folks can anyone else help out with this?

Here you go a simple sheets("Profit Take-Up").select was needed.

I have a cell with the word end in it at the end, you didn't copy it over. =)

Again thanks GF.

Not sure if you noticed but the months of October, November and December lock too early. Think it may be because they have double digits for the month?

Is there a work-around?

Thanks.

R.

Got it to work with a simple =TEXT((formula),"00")

Thanks for all your help GF, it is very much appreciated.

R.