Michael

Be aware that sheet and workbook passwords are easily cracked.

If you don't want certain users to see information, do not include that
information in your workbook.


Gord Dibben Excel MVP

On Mon, 31 Oct 2005 03:48:03 -0800, Peter Rooney
wrote:

Michael,

Try something like this:

Sub Password()

Message = "Enter Password"
Title = "Restricted User Mode"
DefaultPassword = "********"
ReturnedPassword = UCase(InputBox(Message, Title, DefaultPassword))

If ReturnedPassword < "MyPassword" Then
Exit Sub
Else
'Unprotect your ranges etc
End If

End Sub

On;y the prople who know "Mypassword" will be able to reveal the hidden
renges, columns, rows etc.

Hope this helps

Pete

"michael" wrote:

I need to protect a workbook that will hide some of the information from
several users but will show this information to other users. it is very urgent