Utilizng full AutoFilter features while specific cells are protect
Tools, protection, protect sheet. Check the option to use autofilter.
Using code:
Sub Workbook_Prot()
Const pw = "YourPassword"
'replace two instances of Sheet1 below with your sheet name
Sheet1.Protect Password:=pw, DrawingObjects:=True, _
contents:=True, Scenarios:=True
Sheet1.EnableAutoFilter = True
End Sub
Note: the above provides minimal protection. Study protection options if you
need additional protection and include extras. To find these, click on
"Protect" in the code module and press F1.
--
Steve
"Travis" wrote in message
...
I have three worksheets going on with dynamic content between all three
worksheets (data is entered on sheet and then shows up on another sheet).
I
manually protected individuals cells that contain these formulas so a
person
could not inadvertently "screw things up." (Format/Protection/then clicked
"Locked"). I then activated the protection feature for the entire
worksheet
(Tools/Protection/Protect Sheet).
On the top of each worksheet sheet I activated the AutoFilter function so
that each column in that worksheet can be filtered. When I click on the
AutoFilter drop down menu I am able to filter each column by the lower
options (All, Top 10, Custom, Blanks, Non Blanks) but I cannot use the two
top options (Sort Ascending, Sort Descending).
Is there a way to have the protection of formulas in individual cells and
also have the ability to utilize the full functionality of the AutoFilter
and
sorting features?
Thanks!
|