Password in a macro

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

ordnance1 - 18 May 2006 20:41 GMT

I have a macro which requests a password before allowing one to change a
worksheet. I do not want the password to be case sensitive. My code follows:

On error GoTo Error
If TextBox1.Text <> "groupproject" Then
Unload UserFormPassword

GoTo Error
Exit Sub
Else Unload Password_UserForm
New_Or_Edit.Show

End If
Exit Sub
Error:

Unload Password_UserForm
Invalid_Password.Show

What can be done to make this NOT case sensitive?

Reply to this Message

Jim Thomlinson - 18 May 2006 20:51 GMT

Use the UCase (or LCase) function to check the Upper case value of what was
entered against the Upper case value of the password. Make sure to UCase both
sides (the entry and the password).

Signature

HTH...

Jim Thomlinson

> I have a macro which requests a password before allowing one to change a
> worksheet. I do not want the password to be case sensitive. My code follows:
[quoted text clipped - 16 lines]
>
> What can be done to make this NOT case sensitive?

Reply to this Message

Patrick Simonds - 19 May 2006 02:11 GMT

Thanks!

Could not get that to work the way I wanted, but came up with this:

With TextBox1
.Value = LCase(.Value)
End With

Placed at the beginning of my code, it did the job.

> Use the UCase (or LCase) function to check the Upper case value of what
> was
[quoted text clipped - 23 lines]
>>
>> What can be done to make this NOT case sensitive?

Reply to this Message