On opening a workbook (XL2003) I want users to enter a password which will give them read Only permissions or access to the whole book. I do not want use the "save as" option it is not suitable for my needs & here is why. I have about 10 staff who need to fill in timesheets using XL SS on a public folder on the server. The staff need full access to file & management such as myself only need to view (read only) the timesheet without the ability to change data. Using the "save as" function the staff need to input 2 passwords.
The staff (in general) are not overly computer literate so I was hoping to be able to write code so that on Workbook_Open event only one password is entered and depending on the password gives the user full access or readonly access. This will also save management having to remember different passwords for read only access to different staff timesheet files & will give crude protection to the files.
Private Sub Workbook_Open()
Dim Message, Title, Default, Password As String
Message = "Enter your password" ' Set prompt.
Title = "Password" ' Set title.
Default = " " ' Set default.
' Display message, title, and default value.
Password = InputBox(Message, Title, Default)
If Password = "test" Then
Workbook.ReadOnly = True
Else
Workbook.ReadOnly = False
End If
End Sub
Error occur on "Workbook.ReadOnly" lines . I also want to put an errorchecking code for invalid passwords. Again, I know I can use the "save as" option but that is not what I need.
I have a sheet that is password protected. I have this code attached to a command button. It will unlock the worksheet, autofilter it, print it, unfilter it, and password protect the sheet again. However it is protecting it without a password. I need to have it protected with the password so that someone will not be able to just go to tools to unprotect the sheet.
Private Sub CommandButton1_Click() ActiveSheet.Unprotect "rainforest" Columns("O:O").Select Selection.AutoFilter Selection.AutoFilter Field:=1, Criteria1:=">0", Operator:=xlAnd ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Selection.AutoFilter Field:=1 Selection.AutoFilter ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _ , AllowSorting:=True, AllowFiltering:=True End Sub
I have a workbook that contains a series of macros designed to compare various reports and spit out a report. I don't want my users to have to insert a password, but I want to keep my workbook protected. I've already protected the macros in the VBA Properties, so those are pretty safe, but the worksheets in the workbook are susceptible to changes that will hose my macros.
Setting the workbook to "Read Only" in Properties on our shared drive helps, but any user can change that at will. Within Excel, going to Options, Security, I can set a password so no-one can modify that workbook, but that pops up a password box when they open the workbook. I'd like to NOT have the password box pop up unless I need to make changes. Is there a way to do that? I've looked on the internet but can't find a solution on this one.
Sheet Names: 1) PasswordPage - - I would like this to be the page where a user needs to type in their password. If it is correct, their own worksheet would display. 2) Sally - - Hidden and protected, unless Sally types in correct password. Sally's password would be Summer 3) Vanessa - - Hidden and protected, unless Vanessa types in correct password. Vanessa's password would be Pluto 4) George - - Hidden and protected, unless George types in correct password. George's password would be Carpet 5) Alexander - - Hidden and protected, unless Alexander types in correct password. Alexander's password would be Lampost
I would like to ensure that noone else see's anyone else's sheet unless they know the appropriate password, as each individual sheet contains sensitive information.
I also plan to "protect" each sheet also, so that the Sally, Vanessa, George and Alexander cannot make changes to the formulas, etc. - - this I already know how to do.
My question relates more to, How do I hide/ password protect each sheet as outlined above? I assume I must use visual basic, however I am not very familar with it.
I have to use vbscript to add a password to an excel file i'm generating on the fly. I can't use the "Save As" option. Is there any other way I can do this? I need it to prompt the user before any data is displayed.
I am trying to add a command button that will set a custom view, password protect all worksheets, and finally password protect the entire workbook structure. The code I am using will correctly set the view and add the password to the worksheets, but it will not apply the password to the workbook structure. What do I need to add?
protect all the sheets. I would want the password box to popup whenever, the excel file is opened unless the proper password is entered the sheets file should remain deactivated and when the password is entered it should be displayed as "*".
I am trying to create a way to protect and unprotect all sheets and the worbook by means of a Userform pop up interface.
I have managed to create the Userform but what the code will look like and where to place the VBA code that will make it work, Also i would like to automatically save the sheet/s as i switch between them. so that any updates made to the sheet will be automatically saved when i move to the next sheet and also when i protect or close the workbook.
I currently have a macro which i run by selecting tools, macro, macro and then selecting the one i want and pressing run. if i press run I want a box to appear asking me to input a password and if password matches then run that specific macro, can this be done
I am seeking a method of password protecting worksheets in a workbook. The users would all start on a sheet that has their names (A1 - A10) next to their names would be where they type in their password (B1 - B10). If their password is correct their assigned worksheet (Worksheet2) would be unlocked for editing.
1) I need to have code to protect the sheet that my user form is writing to. In other words, when the information from the user form is populated to the sheet, I want that sheet protected by a password that I set where I can unlock it, but no one else can.
2) I need to protect my VBA code with a password, I do not know how to do this, I have looked everywhere. I do however think this is something simple and I will kick myself once I find out where it is.
I had the thought that maybe it would be possible to have a worksheet that is not protected when saved but when it is opened there would be a sub-routine under Sub_Workbook Open that would step through each sheet and assign a random password. And when the workbook is saved it is saved without passwords again.
In this way there would be nothing for a password cracker to pick at. The only flaw I see would be that the password to open the VBA module would need to be static and this would open up the programming to change and remove. But wouldn't this be effective against most users who would only know about the utilities to open the passwords and not the programming behind excel.
I have one workbook with different Tabs that are tied to a master sheet. Different offices are respondable for entering their office information I was hoping instead of seperating the tabs into different workbooks and linking to the master, I could password protect each office tab. Can this be done?
I was wondering if it was possible to hide cells using protect sheet? I have a worksheet that contains confidential data and would like it so the cells appeared blank unless you had the password. I know you can hide rows and columns but I need everything on the sheet to be hidden.
I have set a password under the permissions tab but all it does is protect the structure and not the content. I want all users to be able to view the file, but have to have the password to edit any of the sheets or data on the sheets. I can still protect the individual sheets, but that doesnt quite do what I want.
This question is related to my post here: http://www.excelforum.com/excel-programming/634024-cell-range-protect-unprotect-toggle.html
When you protect a worksheet via VBA then unprotect it the conventional way via: Tools>Protection>Unprotect Sheet. Why is it when you unprotect a worksheet in this way Excel does not ask you for a Password. You simpy only have to select Unprotect Sheet and the sheet is unprotected which for me kinda defeats the object.
I have recorded the following macro and wish to add unprotect (with password), run the macro - which formats the worksheet and then password protect all cells with the exception of range E15:H413 which I want to leave editable by users.