FOLLOW-UP to PREVENT USERS (PROTECTION)
I have a followup question on protecting the worksheets.
I had a similar problems couple weeks aback, worked my way around it but still haven't found exactly what I'm looking for. I need a way to protect the worksheet, while allowing users to sort columns. I know one of the options under tools-- protection says i allows sorting, but it does not work.. this is what I've done: ActiveSheet.Unprotect ("*****") Set sortrange = Application.InputBox(prompt:="Click a cell in th column to be sorted", Type:=8) sortrange.Select Range("A1:AA6000").Sort Key1:=sortrange, Order1:=xlAscending Header:= _ xlGuess, OrderCustom:=1, MatchCase:=False Orientation:=xlTopToBottom, _ DataOption1:=xlSortTextAsNumbers ' Protect the worksheet ActiveSheet.Protect ("******") End Sub As u can see, I had to write VB code to first unprotect the sheet allow sorting then return the protection.... Is there a much simpler way to do this -- Message posted from http://www.ExcelForum.com |
All times are GMT +1. The time now is 08:33 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com