Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Multiple protections
Hi , is it possible to lock and unlock with protection passwords (all using same password) multiple sheets, in a workbook by using just one command or do they have to be all done individually? Guy B -- GuyB ------------------------------------------------------------------------ GuyB's Profile: http://www.excelforum.com/member.php...o&userid=27994 View this thread: http://www.excelforum.com/showthread...hreadid=474983 |
#2
|
|||
|
|||
GuyB Wrote: Hi , is it possible to lock and unlock with protection passwords (all using same password) multiple sheets, in a workbook by using just one command or do they have to be all done individually? Guy B Hi GuyB You will need a macro to do this, see details below. If you want this just for 1 workbook put the macro into the Visual Basic Editor for that sheet, if you want it available for all workbooks you will need to put it into the visual basic editor for Personal.xls Public Sub Unprotect_All() Dim wks As Worksheet Dim vPword As Variant On Error Resume Next For Each wks In ActiveWorkbook.Worksheets With wks .Unprotect vPword Do While .ProtectContents vPword = Application.InputBox( _ prompt:="Enter password for " & .Name, _ Title:="Unprotect sheets", _ Default:="", _ Type:=2) If vPword = False Then Exit Sub 'user cancelled .Unprotect vPword Loop End With Next End Sub Public Sub Protect_All() Dim wks As Worksheet Dim vPword As Variant vPword = Application.InputBox( _ prompt:="Enter Password: ", _ Title:="Protect sheets", _ Default:="", _ Type:=2) If vPword = False Then Exit Sub 'user cancelled For Each wks In ActiveWorkbook.Worksheets wks.Protect vPword Next End Sub -- Paul Sheppard ------------------------------------------------------------------------ Paul Sheppard's Profile: http://www.excelforum.com/member.php...o&userid=24783 View this thread: http://www.excelforum.com/showthread...hreadid=474983 |
#3
|
|||
|
|||
Hey Paul, thnak you for your assistance. I am creating reports for a school and hope that this may save me time. Cheers Guy B -- GuyB ------------------------------------------------------------------------ GuyB's Profile: http://www.excelforum.com/member.php...o&userid=27994 View this thread: http://www.excelforum.com/showthread...hreadid=474983 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
view multiple files in multiple windows on multiple screens. | Excel Discussion (Misc queries) | |||
How do i auto create multiple files from 1 with multiple sheets | Excel Worksheet Functions | |||
Adding multiple worksheets | Excel Worksheet Functions | |||
Can I get the mode, min, and max with multiple criteria? | Excel Discussion (Misc queries) | |||
XML / parent with multiple children and with multiple children | Excel Discussion (Misc queries) |