PASSWORD

[Rob33]

I am trying to get a Userform to have a password so that it allows a person (who types in the correct password) to go to another sheet in a workbook??

I have hidden the sheet tabs thhrough "tools" - "Options" - just so people can't see all the sheet tabs!


Can anyone help!!!

 

[crobertson]

Simple, and to the point. I think you can format the inputbox as a password field, but I can't recall how.

Now just protect your code and you are all set.

Private Sub TextBox1_Change()
Password
End Sub


Sub Password()
If TextBox1.Value = "Password" Then
Sheet1.Visible = xlSheetHidden
Sheet2.Visible = xlSheetVisible
Else
Sheet1.Visible = xlSheetHidden
Sheet2.Visible = xlSheetHidden
End If
End Sub

 

[Rob33]

password

- is it possible to go to sheet2 after the "enter" key is pressed - with the below code, as soon as "password" is typed the userform still remains - i was hoping to be able to press "enter" and the userfrom disappears and the person is either in sheet1 (incorrect password) or sheet2 (correct password)

Private Sub TextBox1_Change()
Password
End Sub


Sub Password()
If TextBox1.Value = "password" Then
Sheet2.Select
Else
Sheet1.Select
End If
End Sub

 

[crobertson]

Try adding

UserForm1.Visible = xlSheetHidden

I will try it and get back tommorow

 

[Tazguy37]

You might also try setting the PasswordChar Property of the TextBox to, for example, "*".

Hope that helps!

 

[Rob33]

Got the - PasswordChar Property - thanks Tazguy37

where in the code do i add:

UserForm1.Visible = xlSheetHidden

to make it work?????

 

[Oorang]

Just remember this particular type of "security" is really really easy to break. :wink:

 

[Tazguy37]

You might try:

Sub Password()
    If TextBox1.Value = "password" Then
        Unload UserForm1
        Sheet2.Activate
    Else
        Sheet1.Activate
    End If
End Sub

Just remember this particular type of "security" is really really easy to break.

Yup. Either protect your protect your VBA Project or put the code in an add-in.

 

[Rob33]

Password



Works a treat!!!

I have protected the VBA Project - most users won't know how to access it anyway (Users are not very good at Excel - which i why i needed to Password some sheets - becuse it is the people who don't know what thay are doing that seem to do the most damage to my spreadsheets!!!)



THANKS AGAIN

ROB!!

 

[Mark O'Brien]

I know you got a satisfactory answer, but this is a good thread to link to this solution that Juan Pablo Gonzalez put together one day when he was bored. It's a pretty damned good read.

http://www.mrexcel.com/board2/viewtopic.php?t=16886&highlight=password