Lock cells based on a date

[antonywijesinghe]

Hi guys,
Thanks heaps for helping me with the part 1 of my problem.
Part 2 of my problem:

I want to lock down the sheet allowing only few cells unlocked for data entry and unlock certain cells based on a date so no one can edit the data in that cell before or after that date.

123.jpg

1. First 5 columns and last 2 columns should be always unlocked giving the ability to change data any time
2. YES/NO drop down before Follow up after 48 hours should be unlocked only of that date is today (eg: H2 = Today()). Same for Reminder call YES/NO (Eg K2=Today())

I found the below VBA script but it unlocks the entire ROX if the conditions are met.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Excel 10 Tutorial
    If Range("H" & Selection.Row).Value <> Date Then
        ActiveSheet.Protect Password:="123456"
        MsgBox "Only today's date row can be edited!"
    ElseIf Range("H" & Selection.Row).Value = Date Then
        ActiveSheet.Unprotect Password:="123456"
        ActiveSheet.EnableSelection = xlNoRestrictions
    End If
End Sub

Is there any way to do this without a VBA script because I want to host this file in Office 365 and 365 don’t support VBA ?

Much appreciate your help.

[MarvinP]

Hi Anthony,

I don't think VBA will work on your Excel Online. Read about it at:

https://technet.microsoft.com/en-us/...or=-2147217396
Look for the section of VBA and Macro Scripting.

https://support.office.com/en-us/art...a-4f0fb5014343

[antonywijesinghe]

I saw this while a when searching for a solution for a different problem. That’s why I am looking for a way to do what I want without VBA ��

[MarvinP]

You can do it manually..

Look at the first link above for "Protection". It says:
When you share an Excel file with other users, you can protect a worksheet to help prevent it from being changed, and you can choose the actions that you allow the users of your worksheet to perform.

[antonywijesinghe]

Hi Marvin,

That will protect the entire sheet and unlock the entire sheet when password is entered. I want only specific cells to be protected/unprotected based on a date

[alansidman]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE] [/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Click on Edit to open your thread, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

(This thread should receive no further responses until this moderation request is fulfilled, as per Forum Rule 7)

[antonywijesinghe]

OK !! I did something like this using conditional formatting
Capture2.JPG

format the cell (G3) BLACk if cell H3<>Today()

but the problem is it will format every cell in that column if the cell is not = Today(). I want to leave the above cells as it is (user cant change) with YES/NO.