Hi,

I have a workbook in which users are inputting data via
user forms. Each time data is entered, or the file changed
I am protecting the sheets, but without a password, using
the following script.

ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True

Is there script (or other method) that I can use to assign
a password so that the worksheets are protected with
password and cannot be amended by simply clicking
ToolsUnprotect Worksheet?


Help gratefully received

ActiveSheet.Protect "MyPassword"

--

Vasant



"Graham" wrote in message
...
Hi,

I have a workbook in which users are inputting data via
user forms. Each time data is entered, or the file changed
I am protecting the sheets, but without a password, using
the following script.

ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True

Is there script (or other method) that I can use to assign
a password so that the worksheets are protected with
password and cannot be amended by simply clicking
ToolsUnprotect Worksheet?


Help gratefully received