Userform in Excel with Remember Password and User id option or check button

What would be the advantage of this? Once implemented anyone could open the workbook.

Why don't you make use of a Global Variable? In a module, define 2 global variables:

Public GlobalUserID as String
Public GlobalPassword as String

And, in the Submit Button event, save the UserID and Password in the global variables & in the form load event, retrieve them in the corresponding text boxes. However, when you close the file & open it again, they would be lost.

An alternative would be to save the UserID & Password at some place in one of the sheets and retrieve them.

But then, as Roy pointed out correctly, what is the whole point of having the UserID and Password?

--Karan--

Global variables are lost when the workbook is closed.

Yes guys it's true that the user id and the password will get lost when the workbook will be closed but i am going to use this userform in my excel addin. So my first question is if at all i am using the "Global Variable" option in my addin will it remember the user id and password for the particular user if he uses remember me option button in the userform, if yes how exactly it will work will it go off if the excel is closed or it will get saved somewhere in background.

Now if you say that it will go off after closing entire excel then as far as storing user ids and passwords is concerned i think i can get them stored in an sql database which will save the login info of all the users who will use "Remember me" option button in my excel addin userform. Can you please provide me with an example code for the above.

Thanks a lot for your help in advance.

Global variables will be stored as long as the workbook (addin ) is active. If you want to store them permanently you can store them in a sheet in the addin or write them to the registry.

You don't open a userform with Call, you need

UserForm1.Show

I still can't understand why you need to do this, nor why you want a log in form for an addin

Place the UserID and Pword in the Registry. Even if the computer is turned off the values are still accessable.
This would make it work for that computer only.
Use and IF statement to compare against who is logged in the computer. As log as the user logs off the next user wont have access to the app without entering UserID and Pword.
Examples:
Save to registry

SaveSetting "YourApp", "Variables", "UserID", UserID
SaveSetting "YourApp", "Variables", "Pword", Pword

Read from registry.

sUserID = GetSetting("YourApp", "Variables", "UserID", "UserID")
sPword = GetSetting("YourApp", "Variables", "Pword", "Pword")

Of course use words for UserID and Pword that arent as easily recognized.
You could also encrypt and decrypt the values making them illegible from within the registry.

Example from your workbook.

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
sUserID = TextBox1.Value
sPword = TextBox2.Value
SaveSetting "YourApp", "Variables", "UserID", sUserID
SaveSetting "YourApp", "Variables", "Pword", sPword
SaveSetting "YourApp", "Variables", "ChkBox1", True
End If
End Sub

Private Sub Close1_Click()
Unload Me
End Sub

Private Sub OK_Click()
sUserID = TextBox1.Value
sPword = TextBox2.Value
If CheckBox1.Value = True Then
sUserID = TextBox1.Value
sPword = TextBox2.Value
SaveSetting "YourApp", "Variables", "UserID", sUserID
SaveSetting "YourApp", "Variables", "Pword", sPword
SaveSetting "YourApp", "Variables", "ChkBox1", True
Else
SaveSetting "YourApp", "Variables", "UserID", ""
SaveSetting "YourApp", "Variables", "Pword", ""
SaveSetting "YourApp", "Variables", "ChkBox1", False
End If
Unload Me

End Sub

Private Sub UserForm_Initialize()
Dim sUserID As String
Dim sPword As String

sUserID = GetSetting("YourApp", "Variables", "UserID")
sPword = GetSetting("YourApp", "Variables", "Pword")
TextBox1.Value = sUserID
TextBox2.Value = sPword
End Sub

This saves the UserID and Pword to the registry if CheckBox1 is true, if false the values saved are removed. TextBox1 and 2 will have the values displayed while textbox2 are encrypted ("*"). Everytime a user opens the app fire the userform adn as long as they select checkbox one as true, the UserID and Pword will remain the same.

I also set values for CheckBox1 if its true or false.
From this you can work from actual user login of the computer if you need authorization to be more indepth.

HTH

Originally Posted by abhay_547

Hi Rick,

Can you please help me with the below :

1) The term "YourApp" in your code refers to what ?. As per my assumption it should the exe file of Essbase program for the login of which i need userform but please clarify.

2) As far as variables are concerned i am not sure what should i enter in place of the same.

Here is the code used by me to connect to a essbase server.



I have attached my actual excel addin file as an xls file. Please have a look.

Thanks for your help in advance.

1. "YourApp" is what ever you want to call the macro, see my changes.
I cant run most of your macro, not sure what its trying to connect to.

Try the attached file. I have placed notes in the file.

p.s.
I added a macro for you to look at, shows you how to add a Tool Bar.