Disguised Password
 

Hi all,

Using this code to make a "Very Hidden" sheet, visible.
It works fine.

Sub ShowSheets()
Dim sPass
sPass = InputBox("Please input password")
If sPass = "12345" Then
Sheet4.Visible = True
End If
End Sub

Goal is when entering password to be able to input a string of random
characters,
of which, the last 5 would be the password. The code will be able to
regonize that
the last 5 characters are correct, ignor all the characters before
that, and run the rest of the code

IE: Someone is looking over my shoulder whom i do not want to know my
password.
I can just enter some jiberish & the last 5 characters being correct.
They will not be able to remember the jiberish they saw me put in.

Does that make sense to anyone?


--
Desert Piranha


------------------------------------------------------------------------
Desert Piranha's Profile: http://www.excelforum.com/member.php...o&userid=28934
View this thread: http://www.excelforum.com/showthread...hreadid=528434

Disguised Password
 

Hi Dave,

Try:

If Right(sPass, 5) = "12345" Then


---
Regards,
Norman



"Desert Piranha"
<Desert.Piranha.25irp1_1143783906.1314@excelforu m-nospam.com wrote in
message news:Desert.Piranha.25irp1_1143783906.1314@excelfo rum-nospam.com...

Hi all,

Using this code to make a "Very Hidden" sheet, visible.
It works fine.

Sub ShowSheets()
Dim sPass
sPass = InputBox("Please input password")
If sPass = "12345" Then
Sheet4.Visible = True
End If
End Sub

Goal is when entering password to be able to input a string of random
characters,
of which, the last 5 would be the password. The code will be able to
regonize that
the last 5 characters are correct, ignor all the characters before
that, and run the rest of the code

IE: Someone is looking over my shoulder whom i do not want to know my
password.
I can just enter some jiberish & the last 5 characters being correct.
They will not be able to remember the jiberish they saw me put in.

Does that make sense to anyone?


--
Desert Piranha


------------------------------------------------------------------------
Desert Piranha's Profile:
http://www.excelforum.com/member.php...o&userid=28934
View this thread: http://www.excelforum.com/showthread...hreadid=528434

Disguised Password
 

Norman Jones Wrote:
Hi Dave,

Try:

If Right(sPass, 5) = "12345" Then

---
Regards,
NormanHi Norman,

Excellent !

Thank You Very Much


--
Desert Piranha


------------------------------------------------------------------------
Desert Piranha's Profile: http://www.excelforum.com/member.php...o&userid=28934
View this thread: http://www.excelforum.com/showthread...hreadid=528434

Disguised Password
 

Someone is looking over my shoulder whom i do not want to know my password.

Instead of using InputBox, you could use a textbox on a userform. Textboxes
have a PasswordChar property that makes the input characters appear as
asterisks or whatever character you like.


Regards,
Vic Eldridge


"Desert Piranha" wrote:


Hi all,

Using this code to make a "Very Hidden" sheet, visible.
It works fine.

Sub ShowSheets()
Dim sPass
sPass = InputBox("Please input password")
If sPass = "12345" Then
Sheet4.Visible = True
End If
End Sub

Goal is when entering password to be able to input a string of random
characters,
of which, the last 5 would be the password. The code will be able to
regonize that
the last 5 characters are correct, ignor all the characters before
that, and run the rest of the code

IE: Someone is looking over my shoulder whom i do not want to know my
password.
I can just enter some jiberish & the last 5 characters being correct.
They will not be able to remember the jiberish they saw me put in.

Does that make sense to anyone?


--
Desert Piranha


------------------------------------------------------------------------
Desert Piranha's Profile: http://www.excelforum.com/member.php...o&userid=28934
View this thread: http://www.excelforum.com/showthread...hreadid=528434

Disguised Password
 

Vic Eldridge Wrote:
Someone is looking over my shoulder whom i do not want to know m
password.

Instead of using InputBox, you could use a textbox on a userform
Textboxes
have a PasswordChar property that makes the input characters appear as
asterisks or whatever character you like.

Regards,
Vic EldridgeHi Vic,

Thx for this info. I want to learn this as well.

For this particular case though, Normans code is perfect,
cause what they are doing is looking at the keyboard,
to see what i key in as a password. They are not looking at the screen

--
Desert Piranh

-----------------------------------------------------------------------
Desert Piranha's Profile: http://www.excelforum.com/member.php...fo&userid=2893
View this thread: http://www.excelforum.com/showthread.php?threadid=52843