Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
can you make a password active after a certain date?
I dont know if this is at all possible?? I wanted to enable a spreadsheet to be password protected after a certain timeframe has passed - or on a specified date. No idea where to start so any help or suggestions would be appreciated :) -- RCollinge ------------------------------------------------------------------------ RCollinge's Profile: http://www.excelforum.com/member.php...o&userid=24276 View this thread: http://www.excelforum.com/showthread...hreadid=378922 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
can you make a password active after a certain date?
Good morning RCollinge This isn't possible using any native Excel commands but we could write our own using the Before_Save event procedure. The code below will happily let a workbook save without a password, however, after 1st Jan next year a password (of "password") will be added - with no warning - to the file when it is saved. However, there is a big but here. The user must say "OK" to run macros when the file is opened - if the user says no to the macro question the code will do nothing. And don't forget that this code (as it uses event procedures) needs to go into the ThisWorkbook pane of the VBE. Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Application.DisplayAlerts = False mydate = Now() mydate2 = DateValue("January 1, 2006") ActiveWorkbook.Save If mydate mydate2 Then ActiveWorkbook.SaveAs Filename:="C:\Book4.xls", Password:="password" End If Application.DisplayAlerts = False End Sub HTH DominicB -- dominicb ------------------------------------------------------------------------ dominicb's Profile: http://www.excelforum.com/member.php...o&userid=18932 View this thread: http://www.excelforum.com/showthread...hreadid=378922 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to make identical cell datas active to allow changes | New Users to Excel | |||
VBA: Make Excel the active application | Excel Discussion (Misc queries) | |||
How to make only the cells i need active | Excel Worksheet Functions | |||
Make this the active workbook | Excel Programming | |||
Make a particular cell the active one | Excel Programming |