Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enable filter to work in a protected sheet from Excel 2003 to 2000
Hi,
I use XP SP2 MS Office 2003. I created a WB with a WS using the Filter function, and since I wanted to protect the WS, in order to allow the filter to work I've checked the Filter box. So far so good. Unfortunately, some of the users have OS W2K - MS Office 2000 or OS XP SP1 - MS Office 2000. As a result, when they try to use the filter function, it doesn't work. I entered the following code to solve the issue, but still the problem is there. Private Sub Workbook_Open() 'Allow filter to work in Excel 2000 With Worksheets("Sheet1") If Not .AutoFilterMode Then .Range("A1").AutoFilter End If .EnableAutoFilter = True .Protect Password:="password", _ Contents:=True, UserInterfaceOnly:=True End With End Sub Can you help me in understanding where I'm wrong? Thanks Alex |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enable filter to work in a protected sheet from Excel 2003 to 2000
Hi,
I know it's Friday and I wouldn't like to stress, but if you can come out with a suggestion I really would appreciate it :) Thanks Alex "Metallo" wrote: Hi, I use XP SP2 MS Office 2003. I created a WB with a WS using the Filter function, and since I wanted to protect the WS, in order to allow the filter to work I've checked the Filter box. So far so good. Unfortunately, some of the users have OS W2K - MS Office 2000 or OS XP SP1 - MS Office 2000. As a result, when they try to use the filter function, it doesn't work. I entered the following code to solve the issue, but still the problem is there. Private Sub Workbook_Open() 'Allow filter to work in Excel 2000 With Worksheets("Sheet1") If Not .AutoFilterMode Then .Range("A1").AutoFilter End If .EnableAutoFilter = True .Protect Password:="password", _ Contents:=True, UserInterfaceOnly:=True End With End Sub Can you help me in understanding where I'm wrong? Thanks Alex |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enable filter to work in a protected sheet from Excel 2003 to 2000
My first guess is that the worksheet is protected, but a filter doesn't exist.
Then when your code runs, it tries to apply the filter and blows up because of the protected worksheet. Maybe unprotecting the worksheet before applying the .autofilter would be sufficient. If that's not it, you may want to post the details of the problem. Metallo wrote: Hi, I use XP SP2 MS Office 2003. I created a WB with a WS using the Filter function, and since I wanted to protect the WS, in order to allow the filter to work I've checked the Filter box. So far so good. Unfortunately, some of the users have OS W2K - MS Office 2000 or OS XP SP1 - MS Office 2000. As a result, when they try to use the filter function, it doesn't work. I entered the following code to solve the issue, but still the problem is there. Private Sub Workbook_Open() 'Allow filter to work in Excel 2000 With Worksheets("Sheet1") If Not .AutoFilterMode Then .Range("A1").AutoFilter End If .EnableAutoFilter = True .Protect Password:="password", _ Contents:=True, UserInterfaceOnly:=True End With End Sub Can you help me in understanding where I'm wrong? Thanks Alex -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to enable Copy/Paste on protected work sheet? | New Users to Excel | |||
UDF doesn't work on a protected sheet in Excel 2003 | Excel Discussion (Misc queries) | |||
UDF doesn't work on a protected sheet in Excel 2003 | Excel Discussion (Misc queries) | |||
UDF doesn't work on a protected sheet in Excel 2003 | Excel Discussion (Misc queries) | |||
Excel 2000 and filter feature in a protected workbook | Excel Programming |