• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Sheet labels

J G

Member
I have developed a budget template in excel, with much assistance from this website and its users, for my company. I have to protect this workbook's structure so that the users can't add/delete, hide/unhide sheets. As a result the sheet labels cannot be edited. Is there a way to retain this protection and also let users edit the sheet label?

Thanks,
JG
 
If your file is macro-friendly, you could add a sheet-renaming button!

Would go something like

Code:
Sub button1_Click

dim sheetnum as integer

sheetnum = inputbox("Enter sheet number of the sheet you want to rename") 'You might want a listbox that automatically lists all worksheets so that the user can just click on one

Thisworkbook.Unprotect password:=pwd1

thisworkbook.Worksheets(sheetnum).Name = inputbox("Enter new sheet name")

ThisWorkBook.Protect Structure:=True, Windows:=False, Password:=pwd1
end sub
 
  • Like
Reactions: J G
Thank you. This has been such a headache. I'm going to study your suggestion and will probably have follow-up questions for you.
 
Back
Top