I currently have set up two macros that will unprotect and protect all sheets. When I run the macro I noticed that it will not unprotect the sheets that have been set as a new sheet for the chart (the chart is not a object in a sheet it is a sheet all by itself) Can anyone tell me where I have gone wrong?
View 14 RepliesI have created a form that allows users to input data to an excel sheet, and also will enable users to view the data once they are done.
Is there a way to unprotect the sheet using VBA so that the data can be written, and then protecting once the data has been input?
I want to run a macro that puts information from one sheet into another. The destination sheet is protected so I want to unprotect the sheet, do the copy and pasting then reprotect the sheet. The sheet has a password and I can't work out how to put that into the macro. It works fine without a password.
View 9 Replies View Relatedi would like the user to be able to unprotect the workbook via clicking a button. this button would first ask the user for a password before unprotecting the workbook.
how can i code this through VBA?
i already built the following VBA ...
I have a workbook which contains 52 worksheets, all of which need protecting. Is there a way of protecting / unprotecting all these worksheets without having to enter my password on each separate sheet?
View 3 Replies View RelatedI cannot get my spellcheck to check any textbox. Is there a way to do this? Unprotecting sheets before spellcheck will work, but nothing about texboxes.
View 7 Replies View RelatedI am trying to protect all sheets on a Workbook Close event.
I don't want the user to even be able to Select the Loked cells so I set it up that way through formating of cells.
This is what I have tried:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim sh As Worksheet
For Each sh In ThisWorkbook.Worksheets
sh.Protect Password:="P@ssword", DrawingObjects:=True, Contents:=True, Scenarios:=True
ActiveSheet.EnableSelection = xlUnlockedCells
' sh.Protect Password:="P@ssword"
Next sh
End Sub
I even tried the commented out line in that postion instead of where it is now.
It does protect but still allows selection of locked cells.
Private Sub Worksheet_Activate()
ActiveWindow.WindowState = xlMinimized
If InputBox("Pleas enter the password: ") "Password" Then Sheets("OkToSeeThisOne").Activate
ActiveWindow.WindowState = xlMaximized
End Sub
This is the code i enter into 3 sheets that i don't want ppl to see unless they know the password but if they press cancel the End on the debug error they can view the sheet lolz. How can i stop them actually viewing it at all?
I have different sheets in my workbook for which i have different passwords with which i need to protect each sheet with the password assigned to it.
Is it possible to do a macro which automatically protect the sheets with the correct password.
I have attached a sample workbook the sheet "passwords" will have sheet names in first column and respective passwords in the second column.
I am using some VBA I found here to password protect a hidden sheet. It works perfectly for 1 sheet, but I am trying to hide 6 but am having problems. Under the HideSheets part I've modified it fine, by using
Sub HideSheets()
'Set worksheet to Very Hidden so that it can only be unhidden by a macro
Worksheets("Confidential1").Visible = xlSheetVeryHidden
Worksheets("Confidential2").Visible = xlSheetVeryHidden
Worksheets("Confidential3").Visible = xlSheetVeryHidden
End Sub.........
I have a sheet that pulls data from an external source. I want it so that when a person clicks on a cell or a range of cells, it automatically locks and hides the formula. I don't want to lock it by using the conventional method because protecting it will cause the external data not to be able to populate the cells. So my thinking is that when the data is imported, and the user clicks on a cell, it will automatically lock and hide.
I need columns
A C E:BB to be locked and hidden as soon as someone clicks it. Is this possible?
I read somewhere that I may be able to do some type of "Private Sub Workbook_SheetSelectionChange" to achieve this.
I have a large workbook with 10+ sheets i need to protect all at once. I have created a macro in VBA below. It works, but I would like another user to be able to change formatting on the sheets while they are protected. below is my macro.
Sub ProtectAll()
Dim wSheet As Worksheet
Dim Pwd As String
[Code].....
I would like to unlock the work sheet based on the username. However this code does not seems to be working.
The object is that only these users have access to the locked cells on a sheet and those users not on the list would only have access to the unlocked cells.
I have the following VBA in my spreadsheet.
Code:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
ActiveSheet.Unprotect ("kellyz")
If Intersect(Target, Columns("o:o")) Is Nothing Then Exit Sub
For Each C In Intersect(Target, Columns("O:O"))
[Code] ......
As soon as i type anything in the columns, my sheet is unprotected. I need the sheet protected so that the users can not change my formulas.
scenario: sheet & work book are protected to users; however need them to sometimes insert a comment to this sheet.
all columns/rows are locked except columns K, R, Y and every 7th column thru CJ (rows are from 4 - 100).
how do I enable a user to insert a comment without unprotecting sheet / WB? note: there's no pattern, it could be any cell within aforementioned columns.
I've got code that loops through approximately 700 excel files and unprotects the workbook. I have to run this code for five consecutive days, and the issue I'm having is for the files that are unprotected on Day 1, the code still runs for those files the next 4 days.
There may be only 10-15 new files submitted on day 5, but the code still runs through all 700.
I can get it working standalone, and when I protect it, but when I share the document it errors on me and I dont know why. I know there are limitations, but this macro should still run (the macro should unprotect everything, then protect and share after it has run).
Public Sub RQV()
Dim lngRow As Long
If MsgBox("Do you wish to move RQV data to yesterday? Note that all amendments will be reset also.", vbYesNoCancel) = vbYes Then
ActiveWorkbook.UnprotectSharing
worksheet1.Unprotect Password:="unsecureme"
With Application
.Calculation = xlCalculationManual
.EnableEvents = False
. ScreenUpdating = False
End With...................................
I would like to protect the worksheet from modification by other users except column A ( suppose A1: A15).
I have been doing this by removing Locked on format cell and then Protect Sheet on Review tab.
Is it the right way or there are other more reliable way?
I've got about 50 worksheets in a workbook and I'd like to protect them all.
Problem however is that I've got buttons in my worksheets that insert rows, delete rows.
I've also got a dynamic chart with listboxes that select data.
When I protect my worksheets all this is disabled.
Is there a way around this?
This is what I've done so far:
[url]
Is there a way to just protect just a single cell, in order to lock & hide a formula within that cell, without having to password protect the whole worksheet?
View 9 Replies View RelatedI have a bunch of worksheets in my workbook say around 50
Each worksheet has the same template layout!
I am trying to figure out a macro that will select all worksheets from 'KLKN':'KFSN' and protect the cells L45:L52 accross to AL45:AL52
Unfortunately I cannot select all worksheets and protect them, instead I would have to manually do this, or create a macros that will do it for me...
when protect a workbook and select the option for window the window then only appears as about two thirds of a full window?
Is there a way in which you can protect the workbook, select the window option and have the window appear as full size?
Version used: Excel 2003
I have a spreadsheet that everyone in my department uses. My boss has asked me to protect certain columns so that only I can edit them but leave others so that the rest of the depratment can use those.
I have tried locking the ones I am to use and unlocking the ones the others can use then protecting the document. This works well enough as far as it goes, however, it is combersome having to unprotect then reprotect it every time I need to work on it. Also, that method makes the drop down lists that we are using for easy sorting no longer function.
I have a very large workbook - there are only five sheets of this workbook that should be viewed by anyone. What I would like to do and just can't seem to find a solution is...
I would like to set the workbook so that when opening I use a password which will give me full access to anything in the workbook - upon read only, a user would be able to open the entire workbook without a password - but only view it's contents - not be able to do any adjustments.
I have locked cells which I do not want anyone to adjust the formulas to, then protected the sheet - this works, however, because there are so many sheets, it becomes very tedious to unlock and lock sheets to work in them.
I have a Sheet with some Macro Buttons for the boss to use.
How can I protect the sheet from any Data Entry changes, but still allow the Buttons to be used?
I tried a few scenarios and in all, the Buttons can't be used.
I have a work sheet with formulars on column A,B,E and F,(from row 19-119) Column C and D are for inputing data. How do I protect the the columns with formulars at the same time be able to input in column c and D.When I try using protect worksheet it protects all including the one for imputing data..
I have a workbook and i have spent time protecting all the formula cells and allowing user to only be able to select unlocked cells (so they can quickly tab to where they need to input info).
I have lots of codes running and always use Activesheet=unprotect If i am modifying protected cells and then at the end of the code i put back the activesheet=protect.
HOWEVER
When i transfer this book to another machine or to someone else to run it on their machine - ALL of my protection GOES OUT THE WINDOW
Also - is there a way to hide or protect all my code so that users cannot modify it?
If so - how do i get it back to modify state when i want to edit it?
I'm trying to use the Tools|VBA Project Properties dialog box to stop folks from unhiding an xlveryhidden sheet, but even though I check the "lock" checkbox and input passwords in the password and the password verify boxes, Visual Basic fails to stop me from selecting the sheet in question from an Alt-F11 spawned VBA, and editing away.
View 9 Replies View RelatedI have a sheet and want users to be able to type in a set of cells but not able to move the cell how do i do this?
View 9 Replies View RelatedCould there be something that will not show the macros and also make it impossible to edit them (but ofcourse let me have access when I need to change soem thing, password may be? )
Having to talk about password, let me tell you that, I did try and put a password inside the VBA but it didnt seem to make any diff uzzled: