Allow users to edit range ERROR

[blommerse]

Hello,

I've a problem, I have a macro in my sheet that custom sort by hitting
a box.

Now I want to allow users to edit range so I have to protect my sheet.
When I do this thing, my macro said there's an error in it.
How can I allow users to edit range and my macra still working. Can
anyone help me and let my know how???
Thanks

 

[Ardus Petus]

Please post your macro 'Sub...End Sub)

HTH

 

[jpfulton]

Please post your macro 'Sub...End Sub)

HTH

www.cathedraldirectories.com

 

[blommerse]

I changed it now to give the macra the order to unprotect, custom
filter and then protect.
It works now.
But my next question is: Is it possible to allow users to format
cells??
Can you tell me?
Regards, Berry

 

[blommerse]

Hi Ardus, this is my macro:

Sub protection()
'
' protection Macro
' Macro recorded 27.06.2006 by blommerse
'

'
ActiveSheet.Unprotect
Selection.AutoFilter Field:=3, Criteria1:="<>C", Operator:=xlAnd, _
Criteria2:="<>0*"
ActiveSheet.Protect DrawingObjects:=True, _
Contents:=True, Scenarios:=True, _
AllowFormattingCells:=True
End Sub

Now I want that users can't change colors of the cells (except me)
Can you help??
Greets