Filter & Sheet Protection

W

Wim Ruepert

Is there a way that you can allow a user to use a automatic filter on a
protected worksheet ?
 
R

Ron de Bruin

Hi Wim

Private Sub Workbook_Open()
Worksheets("Sheet1").EnableAutoFilter = True
Worksheets("Sheet1").Protect UserInterfaceOnly:=True
End Sub

Right click on the Excel icon next to File in the menubar
choose view code
paste the code
Alt-Q to go back to Excel

This runs every time the workbook opens. It protects the worksheet (Sheet1)and
allows users to use the AutoFilter dropdown lists.
 
W

Wim Ruepert

Fantastisch !!
Heel erg bedankt

Wim


Ron de Bruin said:
Hi Wim

Private Sub Workbook_Open()
Worksheets("Sheet1").EnableAutoFilter = True
Worksheets("Sheet1").Protect UserInterfaceOnly:=True
End Sub

Right click on the Excel icon next to File in the menubar
choose view code
paste the code
Alt-Q to go back to Excel

This runs every time the workbook opens. It protects the worksheet (Sheet1)and
allows users to use the AutoFilter dropdown lists.
Click to expand...
 
Top