Lock Sheets On A Spreadsheet After A Certain Date

Donaghy

New Member
Joined
Sep 13, 2006
Messages
2
Hi All,

Does anyone know how to lock down a sheet on a spreadsheet after a certain date has passed.

For example, after the 28th of september lock down sheet 1, after the 15th October lock down sheet 2, etc.

Any ideas, help appreciated.

thanks.
 

Excel Facts

How to fill five years of quarters?
Type 1Q-2023 in a cell. Grab the fill handle and drag down or right. After 4Q-2023, Excel will jump to 1Q-2024. Dash can be any character.

Oaktree

MrExcel MVP
Joined
Jun 20, 2002
Messages
8,053
Office Version
  1. 365
Welcome to the board.

Assuming cell A1 of each sheet has the "lock date", try putting something like this in the ThisWorkbook module:

Code:
Private Sub Workbook_Open()
Dim i As Integer
For i = 1 To Sheets.Count
If Sheets(i).Range("A1") < Date Then
Sheets(i).Protect
Else: Sheets(i).Unprotect
End If
Next i
End Sub
 

Donaghy

New Member
Joined
Sep 13, 2006
Messages
2
Thanks for replying.

Will give this ago and hopefully it does the job.

cheers.
 

Forum statistics

Threads
1,171,205
Messages
5,874,344
Members
433,046
Latest member
aniruddh

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top