Windows user name and password for authentication

[tsawyer73]

I'd like to protect a small area in the excel sheet. Example H45:M47 where the user should put his/her windows username and password as authentication method through a VBA userform window.

I'm not a VBA expert due to that fact the full step by step VBA code and setup will appreciate!

Thanks

 

[nuked]

How do you propose to check whether the username and password entered is correct when you don't have access to this information?

You'd be better off detecting the username and allowing changes based on it.

eg

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Intersect(Target, [H45:M47]) Is Nothing Then

    If Not Environ("USERNAME") = "user" Then  '<=== The username of the person who is 
allowed to edit it

        [A1].Select
        
    End If

End If
   
End Sub

 

[tsawyer73]

I think with this sample code the username can be identify (VBA Express : Excel - Getting the Username) but I fully don't know how can I check the windows password too

 

[tsawyer73]

And where shall I put this code above?

 

[nuked]

And where shall I put this code above?

Alt + F11
Double click relevant sheet on left hand side
Paste code in big white area on right hand side
Make sure that "user" is whatever username you want to allow access to the cells

 

[tsawyer73]

Thanks but I think that function is different what I'd like to implement with VBA. At this time my VBA script contains a modified version of this script (VBA Express : Excel - Protect cell or cells on sheet without protecting sheet) As you can see the VBA can protect and cell with fixed password. My final goal little bit different than this method because the file will handle by multiple users. Tha's why I need the windows username and password authentication instead of any fixed username and password information.

 

[cytop]

Are you seriously considering storing a users Windows Login name (which you can get using the ENVIRON() function in any case) and their password in an Excel workbook or VBA code?

Have you run this past your IT department...?

 

[nuked]

Thanks but I think that function is different what I'd like to implement with VBA. At this time my VBA script contains a modified version of this script (VBA Express : Excel - Protect cell or cells on sheet without protecting sheet) As you can see the VBA can protect and cell with fixed password. My final goal little bit different than this method because the file will handle by multiple users. Tha's why I need the windows username and password authentication instead of any fixed username and password information.

You need to re-think your plans.

Happy to help provide alternate solutions which would involve:

(1) Detecting the user that is logged on
(2) Assigning spreadsheet permissions based on this against a table of users/permissions that you maintain in the spreadsheet

 

[tsawyer73]

As I see this code:
can handle the windows username but I know nothing about the windows password


Declare Function IGetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal sBuffer As String, lSize As Long) As LongFunction GetUserName() As String On Error Resume Next Dim sBuffer As String Dim lSize As Long Dim x As Long sBuffer = Space$(32) lSize = Len(sBuffer) x = IGetUserName(sBuffer, lSize) GetUserName = left$(sBuffer, lSize - 1)End Function
</pre>

 

[tsawyer73]

So if we can detect the user who is logged on how can we use this for authentication process?
If I choose the 2nd option how can I hide the table with username/password list?

Thanks