VBA Code Not Working When I Protect The Sheet
Nov 9, 2008
I have used the below code to make hide/unhide some columns in my excel sheet. It works fine. Now, I need to protrect the sheet except the coloured cells. So I unlocked the cell by clicking the property of the colored cells & then did this :- tools- protection-Protect sheet - protect unlocked cells. But after protecting this sheet the macro code of hiding/unhiding of the columns are NOT WORKING & Errors is coming. I have used the below code:-
View 4 Replies
ADVERTISEMENT
May 3, 2012
This first macro works fine:
Sub UnhideHBPorCholesterolQ1toQ3()
'
ActiveSheet.Unprotect "password"
Rows("58:67").Select
[Code]....
why the second macro does not seem to work. I get a Run-time error that says "Unable to set the Hidden property of the Range Class".
View 1 Replies
View Related
May 24, 2008
I am trying to design a tool which dynamically results in different cells depending on users inputs. Yet, I am willing to protect most of the cells to avoid any user involuntarily (or voluntarily!) modifying the formulas/contents of the calculated (and locked) cells. Is there any way to protect my sheets, allowing only a certain macro to modify the locked and protected cells?
View 4 Replies
View Related
Aug 25, 2009
I need this code below to work in a macro on a hidden sheet.. FYI the sheet name is "Closed".
View 2 Replies
View Related
Jun 9, 2014
I'm currently using a vba script to unprotect all of my worksheets within my workbook in order to refresh the pivots and then protect them again once the pivots are completed, but there are two worksheets I would like to remain unprotected in order for users to be able to edit them after the pivots have been refreshed. Now I've tried adding a sub code in order to unprotect one of the sheets as a test to see if it will allow me to edit the worksheet after I update the pivots. Unfortunately the coding isn't working, and the worksheet is still remaining in protect mode. Here's the code I am using to protect the worksheets when refreshing the pivot as well as the code I am attempting to use in order to unprotect the one worksheet.
View 4 Replies
View Related
Jul 22, 2013
This very simple color code below worked before but now it gives "Application-defined or object-defined error". When I try it on a new workbook, it works fine.
Code:
Sub sdsdfsd()
Selection.Interior.Color = 65535
End Sub
View 1 Replies
View Related
Jan 12, 2007
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
View 3 Replies
View Related
Feb 24, 2011
I am using Excel 2010 and I have a password protected workbook with password protected sheets that uses several macros. Most of them, in order to run, have to un-protect the sheet and then re-protect it again. This has been accomplished easily enough by adding ActiveSheet.Unprotect Password:= "mypassword" and ActiveSheet.Protect Password:= "mypassword" to the appropriate places in the script. All of my macros, which do various things like sorting and moving data, deleting blank rows, displaying dialog boxes containing warning messages etc. run fine.
My problem is this: when I password protect the sheets manually, I have checked the following options in the "Protect Sheet" dialog box. Under "Allow users of this worksheet to" I have checked 1)Select unlocked cells and 2)Format cells. After entering my password and closing the dialog box my sheet is protected, but I can edit cells in the manner my allowances permit. However, once I run any of the macros that un-protect and re-protect the sheet, I remain able to select and edit unlocked cells (practically, for my purposes, this means that I can input data which will appear in the default font size and color of the sheet) but I cannot format cells (which, practically, for my purposes would allow me to occasionally change the font color and size of the data). Naturally, after running a macro, the other cell-formatting options are unavailable to me as well. Is there any way to get my manual selections to remain in place after running a macro that functions as mine do? Or is there any way to make my manual selections the default settings for a protected sheet?
View 4 Replies
View Related
Dec 6, 2012
I have previously used the following code to successfully pull out IE webpage source code for string manipulation.
Its a crude example to demonstrate the principle:
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Public IE As Object
Sub Sample()
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
[Code] ......
However when I substitute in a Google websites address into the IE.Navigate command, the code runs to the "Source_Code = IE.document ...." line then flags up a Microsoft Visual Basic error. "Run-time error '438': Object doesn't support this property or method"
The webpage that I am trying to access is a confidential company site, so you won't be able to access it yourself, but starts with [URL] ......
The one thing that I have noticed about this website is the Privacy Report icon in the lower right status window (Picture of an eye with a restricted symbol in front). I don't know whether this is the cause of my problem, or purely an incidental observation.
Is there something peculiar with Google sites that means that the source code cannot be extracted in general, or is this an issue specific to my site ? Does the Privacy Report icon have any relevance, and if so how do I switch that off ?
Using :
MS Excel 2010
IE Explorer 8.0
View 1 Replies
View Related
Apr 8, 2014
I want a sheet to copy and paste into another worksheet, I have that code and its working fine, but what I also want to do is for the sheet to be protected,so the code would be, copy, unlock, paste, lock, save.
Here is the code I have so far. I know i have to include ActiveSheet.Unprotect "passowrd" ActiveSheet.Protect "password", but I dont know where to include that last part of the code.
View 5 Replies
View Related
Dec 8, 2008
is there any hard code out there that protects formulas in a cell
i have a sheet with formulas down a column
that used once disappear
is there any way to code this so they are always there?
View 11 Replies
View Related
Mar 31, 2009
Is there a way to protect a VBE project using a macro instead of going to the properties and manually typing in a password? I'm using a macro that emails just one worksheet in my workbook (creates a new temp file, emails, and deletes it) but when the new file gets to the recipient the VBE project is unlocked.
I found a way to protect the worksheet before saving the temp file, so the worksheet is protected as it should be, but the project explorer window is completely open. Then anybody can see the passwords I'm using to protect the sheet in the first place. So I need to somehow re-protect the project before it saves and emails.
View 4 Replies
View Related
May 18, 2009
I would like to protect the VBA modules I have written in a spreadsheet. Is there any way of password protecting these (as there is with Excel workbooks/worksheets) -such that users can not see the VBA code unless they enter a password?
View 4 Replies
View Related
Aug 4, 2006
I understand that we can protect the VBA coding through check the "Lock project from viewing in the Tools>VBAProject Properties. However I'll still need to open some of the code for other users to customize the program while some of the important code are protected.
View 7 Replies
View Related
Aug 26, 2009
how to protect source code from user or give the password when the user view code, right click on a sheet.
View 4 Replies
View Related
Oct 31, 2011
i'm looking for a vba code to solve the following problem a .xlsm workbook, the protect workbook passwork is known as "111111", the VBA project password is "222222", and how to write vba code to insert a new sheet, suppose the workbook has three worksheet, now using vba code to unprotect workbook, and auto insert a newsheet, then protect workbook again, whcih the password remains as "111111" using a commondbutton to do this, everytime you click, insert a new sheet.
View 9 Replies
View Related
Aug 14, 2008
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?
Private Sub cmdReset_Click()
ActiveWorkbook.Unprotect Password:="test"
ActiveWorkbook.CustomViews("Sales").Show
ActiveWorkbook.Protect Password:="test"
ActiveSheet.Unprotect Password:="test"
Sheets("Accessories").Select
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
False
ActiveSheet.Protect Password:="test"
View 7 Replies
View Related
Jul 9, 2007
I need to be able to save a copy of my spreadsheet but protect the structure so that the hidden rows cannot be opened by the person that I e-mail it to. At the moment I am using the current
Private Sub CommandButton2_Click()
Do
fName = Application.GetSaveAsFilename
Loop Until fName <> False
ActiveWorkbook.SaveAs Filename:=fName
Call ProtectRobin
End Sub
Private Sub ProtectRobin()
ActiveWorkbook.Protect ("Robin")
End Sub
The saving part of the macro is working perfectly, however I cannot get the protection to work. It must have a password - I do not want the receipient to be able to go 'Tools' > 'Unprotect Sheet'.
View 6 Replies
View Related
Jan 28, 2014
following code so as to have certain cell ranges protected and unprotected USING COMMANDBUTTON/PASSWORD
Code:
Private Sub CommandButton1_Click()
Dim Password As String
JamesPassword = "MyPassword" '
[Code]......
View 8 Replies
View Related
Jul 24, 2014
Okay, I have this code and it works very well - but it only works if my WORKBOOK is unprotected. I know how to Unprotect then Protect an ActiveSheet, but I can't figure out how to Unprotect then Protect my workbook when the macro runs..
Sub BLM_RENAME_SHEET()
Dim WS As Worksheet
Application.ScreenUpdating = False
For Each WS In ActiveWindow.SelectedSheets
[Code] ......
View 9 Replies
View Related
Jul 10, 2014
I make excel file that contains certain formulas and graphs. Now I wonder is that a way for protect that file so it can be used only on specific cumputer, so if someone copy that file and paste it on their computer file will not work properly
View 1 Replies
View Related
Jan 21, 2010
My user form has a line of code that protects the sheets and does not allow any changes and selection of cells. It worked great on my personla computer.
Running the file on another computer the code does not protect the sheet. The strange thing is that if I go the Tools>Protection> the options is set to Unprotect. That measn that the code actually has protected the sheet but I am still able to make chages. If I manually unprotect and again protect the sheet, it is protected till the time close the file and open it again.
View 11 Replies
View Related
Apr 21, 2009
Excel file 1 has:
Sheet 1: Account numbers and balances
Sheet 2: Mapping information detailing what account in file 1 is to go to a different account number in file 2.
Excel file 2 has:
Lots of sheets where information is to be keyed in.
This is a very manual process with lots of data entry to input into accounting forms I send to our head office. The "file 2" has sheet protection on all sheets so that formats, data, columns etc etc cannot be altered and only certain fields updated.
I think I have successfuly written my scripts to loop through the account values and map those to all spots in all sheets they are referenced to on the mapping document, however I am getting an error message that the "cell or chart you are trying to change is protected and therefore read-only".
Basically I look through the sheet and look for my mapping code, if that matches, I add the balance to the exisitng value of the cell, in the next column.
i.e. if B2 has the corresponding code I will add the balance to the current value of cell C2.
This is an extract of the code where I am looking up the sheet:
Dim ws As Worksheet
For Each ws In Sheets
If Left(ws.Name, 2) "OP" Then
Dim rg As Range
Dim cl As Range
Set rg = Range("A1:IV65536")
For Each cl In rg
If ActiveCell.Locked = False Then
If cl = kessanid Then
cl.Offset(0, 1).Value = acctvalue
End If
End If
Next cl
End If
Exit For
Next ws
It may be that because the sheet is protected as a whole nothing can be done but I was hoping that because I am going to the specific cell which allows input I should be able to do this.
View 9 Replies
View Related
Jan 23, 2013
I am using the following code to protect/unprotect a sheet in a tool that i am working on, which seems to work great. It unprotects the sheet runs the code inbetween the two liens of code and then protects the sheet again.
VB:
ActiveSheet.Unprotect Password = "mypassword"
ActiveSheet.Protect Password = "mypassword"
The issue I am having is if i want to go in and edit the sheet without running the code it will not let me. When I go in and type the password to unprotect it says it is invalid. I have typed it exactly how the code reads. I have even tried including the quotes but no luck.
View 4 Replies
View Related
Jan 5, 2010
Protect columns in a sheet. Is it possible to protect columns for entries?
View 2 Replies
View Related
May 12, 2009
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.
View 6 Replies
View Related
Jul 18, 2009
I'm trying to protect a sheet so that it can be unhidden only if you know the password.
This is because I have a macro that updates some of the cells and there are some people (and only those) that should be able to access it quickly and easily. -> can't use VeryHidden or cell lock.
View 2 Replies
View Related
Jan 18, 2012
I have a workbook with several worksheets. I need to prevent users from viewing worksheet mgrview unless they have a password for it.
View 1 Replies
View Related
Jul 2, 2012
the following macro, changes a few cells etc, then protects the sheet.... however I wanted the protected sheet part to have a password "Sausage"...
macro, so it protects the sheet with a password as "Sausage"
Sub RATIFY1()
'
' RATIFY1 Macro
'
'
Sheets("Outline Generator").Select
ActiveSheet.Unprotect
Range("E6").Select
ActiveCell.FormulaR1C1 = "Outline Ratified"
[Code]....
View 5 Replies
View Related
Dec 3, 2006
I have a very hidden Worsheet called DropList. On open all worksheets are protected.
When I run a Macro that calls on a value from DropList or adds a value to it I get an error message:
"Run time Error '1004"
You cannot use this command on a protect sheet.... "
In the DropList worksheet I have selected all cells and have unlocked them.
I need to keep this workbook very hidden,
How can I unprotect it, whilst keeping it very hidden, so that users can still add data via a combo list?
any suggestions.
View 9 Replies
View Related
