Protect Sheet/tab Names
Just wondering if there is a way to prevent users from changing tab/ sheet names in a workbook? Either via sheet protection (I couldn't find any option) or using code.
View Complete Thread with Replies
Related Forum Messages:
Password Protect: Unlock The Worksheet, Autofilter It, Print It, Unfilter It, And Password Protect The Sheet Again?
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()
Selection.AutoFilter Field:=1, Criteria1:=">0", Operator:=xlAnd
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowSorting:=True, AllowFiltering:=True
Create Array Of File Names/sheet Names
Two part question:
1) I'm relatively new to arrays, but what I need to do is generate a list of file names and the sheets within each one. I would like to use an array for this, but since I don't have much experience.... well....that's why I'm here. Can someone point me in the right direction?
2) And the second part of this.... I was planning on using the FileSystemObject to determine the files in a selected folder and loop through that list of files, opening each one and harvesting the required info (file name and all sheet names). Should I use the FSO or is there something built into Excel that might be better (and also limit the number of dependencies for this little "project" of mine).
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.
Protect The Sheet
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
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.
You Cannot Use This Command On A Protect Sheet....
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?
Macro To Protect All But One Sheet
Greetings I have a workbook with many sheets and i want a macro to protect all the worksheets with certain settings except for one sheet, sheet 3.
I have borrowed some code from this page that I cannot get to work and I would appreciate any help. the code should also have an if statement that unprotects sheet 3 but i don't know how to do that either. I just get syntax errors
Private Sub Workbook_Open()
Dim wSheet As Worksheet
For Each wSheet In Worksheets
wSheet.Protect Password:="secret", DrawingObjects:=True, Contents:=True, Scenarios:= _
False, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
AllowFormattingRows:=True, AllowInsertingRows:=True, AllowDeletingRows:= _
.EnableSelection = xlUnlockedCells
.EnableOutlining = True
Protect Sheet Name From Being Changed
Can you protect a sheet name from being changed by a user?
Can you protect a sheet from being deleted by a user?
I have an Excel 2003 file available to all employees on a network. There are three sheets. Two sheets are protected with passwords and users can not enter any data on them. They are used to hold data needed by the third sheet.
The third sheet (named FORM) is for user input. FORM has a majority of the cells protected with a password. Users can enter information, save the file, print the sheet, or make duplicates of the sheet. The sheet contains data validations, conditional formatting, and formulas.
I have some VBA which acts on all the sheets (even those which users might have inserted) making them visible (very hidden) or not. When a user opens the file (whether for the first time or after adding sheets), I always want them to have FORM unhidden. I have VBA to do this but what if a user changes the name of the sheet? CRASH!
Protect - Unprotect The Sheet
I have a worksheet where the users need to enter time. I have a macro that captures the time when the user hits Ctrl + t
What I want now is a code which protects the cell after entering the time with Ctrl + t.
I tried to do it, but my macro only works when I don't set any passwords to protect the sheet. How can I pass the password to the code and protect the sheet after the code to capture the time is being executed.
Hide & Protect Sheet
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.
Protect The Sheet With Password
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.
Protect Portion Of Sheet
I find the protection options of Excel confusing. I have a pivot table. Alonside it our a few formula columns. I want to protect only the columns outside the pivot but can not get it to work. I tried this:
1) Highlight entire sheet
2) Format Cells Protection - remove checkmark from: Lock Cells
3) Highlight 4 rows outside pivot
4) Format Cells Protection - place checkmark in Lock Cells
5) Tools Protection Sheet - supply password
The result is that the 4 columns outside the pivot are indeed locked BUT SO IS THE PIVOT...ie you can not utlize the dropdowns!
It must have something to do with the pivot, on a regular sheet (no pivot) it works fine. Further if, while Protecting the sheet, I click the: allow Pivot table reporting box, then it allows dropdown usage but blows up as soon as you select something with an error about not being able to redisplay selected itemsbecause of protection being on....
Data List / Protect Sheet
I'd like to protect Excel Worsheet and use the function from Menu Data -> List. The problem is that when I protect the Worksheet the option for new row is not appearing. Although I select all CheckBoxes and allow Sort, Insert Row, Insert Column, Select locked cells, Select unlocked cells etc...
p.s. Excel 2003
Keep Sheet Unprotected But Protect Some Cells
I Need to protect some cells from being Changed or deleted, if i protect the whole sheet there are some cells that need to be changed using the formatting bar I.e borders, colours, font- colour, Merged cells.
the protection setting allows you to leave individual cells unprotected however you still cannot change the border for example.
No Password Asked When Using VBA To Protect Sheet
This question is related to my post here:
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.
Enable Outline But Protect Sheet
I have a sheet that is several hundred rows long and so I have grouped like data so the user can expand or colapse the data they would like to see. There is nothing on the page the user will need to modify so I have protected the page so they cannot make changes. If I protect the sheet then I am no longer able to expand or colapse the groupings.
VBA Code Not Working When I Protect The Sheet
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:-
Protect Sheet Dialog Box Default
I am working with Excel 2003 and find that the default "Protect Sheet" dialog box opens with a default of both the "Select locked cells" as well as the "Select unlocked cells" check boxes marked. Is there a way to change this default?
Protect Sheet With Macro Buttons
I have two macro buttons on a page that hide and unhide columns. When I got to protect the sheet .. the buttons no longer work and ask me to DEBUG. Is there a way to have macro buttons performing tasks AND have the sheet still protected?
In the protect sheet window .. am I have ticked is
Select Locked Cells
Select Unlocked Cells
But these are ticked as a default.
Protect Sheet But Hide/Unhide Columns
I have a speadsheet that has 27 columns for time entries, however employees seldom need to use more than the first 12 columns. I need to protect the sheet but would like the employees to be able to Unhide the columns when they need to use them, then reHide them. I can't find this as an option in either 2003 or 2007.
Protect Sheet But Allow Macro Code To Modify
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?
Workbook Enable Macro Protect / Unprotect The Sheet
I need a macro that I can have in any workbook enabling me to protect / unprotect the workbook that I have currently opened with a set password (let say "Password")
I would link this macro to a button in excel 2002. I have try the following but it doesnt work
Would it be possible that the button (first) works (second) understand whether or not protect / unprotected and do the opposite?
Activeworkbook.protect password:="password", structure:=FALSE, Windows:=false
Lock Cells, Protect Sheet With Password & Time Stamp
I have a worksheet with employees names and their overtime hours worked that week. I would like to add some code to a button that will prompt for a password. If that password matches a predefiened password then lock a range of cells and place a time stamp next to the button and maybe change the button color of the button to Red. Now if the person with the password wants to change the locked cells, they can click the button again and enter the password and the button will turn green so they can make the changes. I would like the time stamp to be updated every time the cells are locked. Also wanted to have one button for every work week so about four buttons per worksheet. Here is an example of the worksheet. The range of cells I want to lock are the ones in bold.
Protected Sheet - Macro To Unprotect, Refresh Sql Query & Re-protect Fails
I have a protected worksheet containing an SQL query. I have two cells on the worksheet unlocked so that users can enter fresh parameters to feed the query.
Because I have to use MS Query to interrogate our SQL server (current IT decree), the query won't support parameters directly when the query cannot be represented graphically - so I have to manually edit the sql command text and then refresh the query - or at least that was why I wrote the code below
The problem: My macro won't unprotect the sheet before it calls the SQL.it therefore won't update the sheet to detail the DSN, command text and number of parameters (latter should be 0) - info just used to verify queryit won't run the query / return the data as the sheet is still protected Comment: I have had to remove sheet protection in order to allow the sql to execute and return data. If protection is removed, the query does execute and return data ( changes in the "parameter" cell contents do cause the query to be correctly modified)
I could comment out the debug info but the query still doesn't return data if the sheet is protected.
Activesheet And worksheets(ndx) where ndx has been defined As ActiveSheet.Name
I apologise If my post Is difficult To follow - especially the code.
nmb = ActiveWorkbook.Name
ndx = ActiveSheet.Name
WkshtQryCon = Workbooks(nmb).Worksheets(ndx).QueryTables(1).Connection
ActiveCell.Value = WkshtQryCon
WkshtQryFld = Workbooks(nmb).Worksheets(ndx).QueryTables(1).CommandText
ActiveCell.Value = WkshtQryFld.......................
Summary Sheet Of Sheet Tab Names
I’ve had a look through the forum and on some of the guides/FAQ but thanks to my ineptitude I have been unable to adapt any of the examples to my specific situation.
What I’m after is this: I need to create a summary sheet for a work book with a variable number of tabs. All I need the summary sheet to do is to make a table of the name of the tab and then cell A17. How would I go about doing this and is it possible to save this macro to my machine/all workbooks instead of just the one?
Look Up Sheet Names
In Column A row 4 of sheet1 I have an account name, for example Sonic, and I have a sheet named the account name, Sonic. In Column B row 4, of sheet1, I would like to return the value in Column B row 3 in sheet named Sonic, or the account named sheet.
I have about 50 different account names along Column A in sheet1, and the same account name sheets opened in the same workbook. Is there a good formula or vba code that will work for all the values in Column A of sheet1 to look for the same named sheet and return the values off of that? Note: on the account sheets in Column A it says ‘Account’ for all of them.. this wasn’t a mistype
Formula Containing Sheet Names
I have done a formula for Abbott as shown below however I actually have about 50 sheets with names. I have the names listed in column A. Is there a formula that instead of typing Abbott as shown I can use the cell in column A to generate a code ?
Duplication Of Sheet Names
I made a macro that will name the current sheet whatever text is found in cell B2 on that sheet. This works great unless that sheet name already exists.
If the sheet name already exists, is there a way to rename it as Cell B2 plus the number 2 after the title so it doesn't cause an error?
"Smith, Bob" is a sheet name, so the macro would make the new sheet name "Smith, Bob 2"
Alternatively, how could I give a pop-up telling about the error and deleting the current sheet instead of renaming it with a "2"?
"Sorry, 'Smith, Bob' already exists. Deleting new sheet." as a popup and have it delete the current sheet.
Sheet Names Add Conditionally
I want to add to it so that if the "Name" entered into the target cell is longer then the maximum allowd length it inserts an abreviation of the words (and increments where nessisary)
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
On Error GoTo StandardName
If Target.Address = "$B$4" Then Sh.Name = Target
Sh.Name = "Sheet1"
Variable Sheet Names In VBA
Running Windows CP; Excel 2003
The Board looks full of some interesting issues today.
I'm working on a workbook that hides and unhides a lot of columns depending on the month the user has selected. No problems here.
The sheets are named regionally, ie National 2008, California 2008 etc. The user is able to select the month and the year from separate combo boxes.
So when 2009 comes around I will need to rewrite many lines of code to point the VBA to the new worksheet names like National 2009, California 2009. My question is, is there a way to reference either variable worksheet names in the VBA or some other manner in which to write the code so I don't need to rewrite every year change?
I currently reference the sheets something like Sheets ("National 2008").Range("H:H").EntireColumn.Hidden=True
Change Sheet Names
I have got a workbook with about 200 sheets... Sheet1 > Sheet200
i need to delete about 100 sheets... sheet100 > sheet200
i then need to add the sheets back in but when i do the sheet numbers start from Sheet201... how do i get it to start from Sheet101 again or can i use some vba to change them later?
Hyperlinks And Sheet Names
I wrote the following macro to create hyperlinked Table of contents on the first sheet of a workbook. It works great unless the sheet name has a space in it, i.e. "new sheet" as opposed to "newsheet". Any way to get it to work for either/ or?
Originally Posted by Code
' Hyperlink Macro
' Macro recorded 2/26/2007 by bpillsbu
Dim ShName As String
Dim ShCt, N As Integer
Dim Sht As Worksheet
ShCt = ThisWorkbook.Worksheets.Count
N = 1
Sheet Names With Spaces In VBA
I have been using the code below for a form. But now I need to change the sheet name to have spaces. But when I do. I comes up with the Run Time 1004 error on the “Ctrl.Text = Range(Ctrl.Tag).Text '*** “ line.
Why is it that this line is not allowing me to have spaces?
Private Sub Load_Controls()
Dim Ctrl As Control
For Each Ctrl In UserForm1.Controls
If Ctrl.Tag "" Then
Ctrl.Text = Range(Ctrl.Tag).Text '***
Sheet Names And Hyperlinks
I have searched the forum and I have seem quite a few referrences to this question but can't find exactly what I'm looking for. I'm using the first sheet in the worksbook as a splash screen which has lots of button macros on there. I want to add one more which will make a list on this sheet from cell b25 down with all the sheet names in the workbook which are also clickable hyperlinks. Does anyone have any idea how to do this, so far I can make a list of the names..
Dim ws As Worksheet
Dim I As Long
I = 25
For Each ws In Worksheets
If ws.Name "Actions" And ws.Name "summary" And ws.Name "Archive" Then
Worksheets("Summary").Range("B" & I) = ws.Name
I = I + 1
But have no idea how to make these names clickable which will make the relevant sheet active. If it helps the sheet name is also in cell A2 of every sheet.
Stopping Duplicate Sheet Names
I have a very simple userform that i'm using to allow users to name their 'location'
Private Sub CommandButton1_Click()
If Me.TextBox1.Value = "" Then
MsgBox "Please give your location a name"
Sheets("Template").Visible = True
ActiveSheet.Name = TextBox1.Value
Sheets("Template").Visible = False
As i'm sure you've already guessed, there is nothing stopping a user from trying to rename the new sheet with an existing name. Is there anyway of checking the entry and workbook for duplicated enteries?
Show Pop-up List Of Sheet Names
when i open a xls, i would like to Display the Vertical Menu Of Worksheets (at the bottom left of the tab names)
--this worksheet has many sheets and i find this an easy way to navigate...
(also, how can i write a macro--for a user shortcut--to display this--currently, i hover my mouse pointer over the bottom left tab navigation object and right click to bring up the vertical display of sheet names...)
Continual Changing Sheet Names
I want to capture data from another workbook each month where the sheet name that I need the data from changes each month. i.e. 0810, 0811, 0812, 0901. Are possible sheet names. I've tried to build this unsuccessfully into the my -
Using Sheet Names As A Named Range
I have a namd sheet for everyday of the year in a workbook, so jan1 jan2 jan3 etc. I have a stats page which brings together certain pertinent data from those pages, so a formula on the stats page might look like this =sum('jan1'!$m$25:$m$900). What I would like to do is to name each day - jan1 jan2 etc as a named range perhaps date1 date2 etc so that the above formula would then look like =sum(date1!$m$25:$m$900).