Multiple Password

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

revdeacon - 12 Sep 2007 23:32 GMT

Is it possble for one Workbook to have more than one password?

Reply to this Message

Pete_UK - 13 Sep 2007 00:33 GMT

If your workbook contains two or more worksheets then each one can be
protected with their own individual password, so, yes, you can have
more than one password in a workbook.

Pete

On Sep 12, 11:32 pm, revdeacon <revdea...@discussions.microsoft.com>
wrote:

> Is it possble for one Workbook to have more than one password?

Reply to this Message

JNW - 13 Sep 2007 01:30 GMT

You can also put a password on the workbook as a whole.

Signature

JNW

> If your workbook contains two or more worksheets then each one can be
> protected with their own individual password, so, yes, you can have
[quoted text clipped - 5 lines]
> wrote:
> > Is it possble for one Workbook to have more than one password?

Reply to this Message

revdeacon - 13 Sep 2007 13:56 GMT

let me give more info...
I am in an environment where I need multiple users to acesss workbooks
specifically for them. I wanted to put all the workbooks on our intranet in
one folder. Once they accessed the public folder they would only be able to
access their workbook via a password.
I would want to access the sames workbooks, but I would like to use a
spearate password which would be the same for all of them. Is this possible?
Two passwords per workbook - one for the specific user and one for me as the
master of all of workbooks.

Thanks

> You can also put a password on the workbook as a whole.
>
[quoted text clipped - 7 lines]
> > wrote:
> > > Is it possble for one Workbook to have more than one password?

Reply to this Message

JNW - 13 Sep 2007 16:02 GMT

Not possible with Windows/Excel available protection. The only way is to use
VBA to create new entry requirements.

Signature

JNW

> let me give more info...
> I am in an environment where I need multiple users to acesss workbooks
[quoted text clipped - 19 lines]
> > > wrote:
> > > > Is it possble for one Workbook to have more than one password?

Reply to this Message

ryguy7272 - 14 Sep 2007 13:46 GMT

Perhaps something such as this...

Public Declare Function GetUserName Lib "advapi32.dll" _
Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Function ReturnUserName() As String
' returns the NT Domain User Name
Dim rString As String * 255, sLen As Long, tString As String
tString = ""
On Error Resume Next
sLen = GetUserName(rString, 255)
sLen = InStr(1, rString, Chr(0))
If sLen > 0 Then
tString = Left(rString, sLen - 1)
Else
tString = rString
End If
On Error GoTo 0
ReturnUserName = LCase(Trim(tString))
End Function

Sub Filt()
Application.ScreenUpdating = False
On Error Resume Next
Dim Number As Integer

Range("J1").Select
Selection = "=ReturnUserName()"
If Range("J1").Text = oprince Or Range("J1").Text = hsmith = Then '< -- this
shows 2 user's login IDs
Number = 2 'this can be whatever you desire
Else
MsgBox ("Unauthorized.")

Exit Sub
End If

' blah, blah, blah, (I user the filter tool to find all criteria that
matched the value 2)

End Sub

I found the function, I think on this DG, a short time ago. I matched the
results of the function with the Sub and got this working later in the
afternoon yesterday.

Hope that helps,
Ryan---

Signature

RyGuy

> Is it possble for one Workbook to have more than one password?

Reply to this Message