View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.misc
Suzanne Suzanne is offline
external usenet poster
 
Posts: 152
Default Macro - protection with filter

Thanks. It does work the 1st time i open the file, if i close and reopen i
don't ge the 'enable macro' window, when i to and run the macro i get the
'maybe your macro security is set to high...' When i exit excel and reopen,
works fine. Seems like it wants me to shut down excel each time i want to
reopen it... I appreciate your help.
--
Thank you -- Suzanne.


"Danny" wrote:

Hi suzanne, I'm ussing the following and this works for me:

Private Sub Workbook_Open()

With Worksheets("FCW Tracking Recs")
.EnableOutlining = True
.Protect Password:="calibtn", Contents:=True, UserInterfaceOnly:=True
End With

Rgds,

Danny

"Suzanne" wrote:

Hello. I have a protected worksheet with a macro that unprotects, sorts,
reprotects. I've had to add the below macro in order for the filters to
function when protected. All works fine THE FIRST TIME i open the file.
When i close the file and reopen it, the filters don't work, the sort macro
will not run - unless i completely shut down Excel and restart. I don't even
get the 'enable' macros window at opening.

Can anyone help please? I got the below of this site and am not sure if
this is what's causing the problem or not. Many many many thanks!

Sub auto_open()
With Worksheets("FCW Tracking Recs")
.Protect Password:="calibtn", userinterfaceonly:=True
.EnableAutoFilter = True
End With
End Sub

--
Thank you -- Suzanne.