I have the following macro so that we can use the outline feature without having to unprotect a sheet.
Private Sub Workbook_Open()
With Worksheets("Schedule")
.Protect Password:="APQP", Userinterfaceonly:=True
.EnableOutlining = True
End With
With Worksheets("Feasibility")
.Protect Password:="APQP", Userinterfaceonly:=True
.EnableOutlining = True
End With
.
.
.
With Worksheets("Launch")
.Protect Password:="APQP", Userinterfaceonly:=True
.EnableOutlining = True
End With
End Sub
However once the macro is run, filtering will not work without unprotecting the sheet first. If you choose not to run the macro, filtering will work without unprotecting the sheet however the outline feature will not.
Can somebody tell me what I need to add and where to make both the outline and filter features to work without having to unptotect the sheet?
NOTE: I am in no way VBA versed; the above code was found and modified on the web
Bookmarks