What I want to do is put code in the ThisWorkbook...Before Save. My
ultimate goal is to test the user and not allow other users to save the file.
I need for others to view the file but I dont want them to be able to save
it. Also, I dont want to password the file because then I have to input a
password every time. Is there a way to in Before Save say something like:

ReturnNetworkName = Environ("UserName")
If ReturnNetworkName = "TheCorrectID" Then
...allow save
Else
MsgBox "You are not the authorized user to save this file."
Endif

Thank you for your help.

Steven