Seems like this was working (In "Thisworkbook"):

Sub workbook_Open()
Sheet1.EnableAutoFilter = True
Sheet1.Protect userinterfaceonly:=True
Sheet2.EnableAutoFilter = True
Sheet2.Protect userinterfaceonly:=True
Protect Password:="pass"

End Sub


Even if I renamed the sheets I still have to use "Sheet1, Sheet2" etc
as commands


Phoenix :

-----------------------------------------------
~~ Message posted from http://www.ExcelTip.com
~~View and post usenet messages directly from http://www.ExcelForum.com

When you used
sheet1.xxxx
You were using the codename for the worksheet. This codename is more difficult
for users to change, so it's probably a little safer.

Alternatively, you could have used:
worksheets("MySheet1").xxxx

When you're in the VBE next time, hit Ctrl-R (to see the project explorer).

Expand it to see the worksheets. You'll see something like:

Sheet1 (mySheet1)

The name to the left is the codename. The name in parentheses is the worksheet
name that appears on the worksheet tab that the users can see.



Phoenix wrote:

Seems like this was working (In "Thisworkbook"):

Sub workbook_Open()
Sheet1.EnableAutoFilter = True
Sheet1.Protect userinterfaceonly:=True
Sheet2.EnableAutoFilter = True
Sheet2.Protect userinterfaceonly:=True
Protect Password:="pass"

End Sub

Even if I renamed the sheets I still have to use "Sheet1, Sheet2" etc.
as commands

Phoenix :)

------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/

--

Dave Peterson