ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   a little more secure login (https://www.excelbanter.com/excel-programming/333854-little-more-secure-login.html)

Gixxer_J_97[_2_]

a little more secure login
 
hi all,

i have my logins / pass and other user information (pseudo permissions) on a
sheet that will always be hidden to the user. (thought about an external file
- but decided against it, also thought about authenticating with the domain
server, but a little overkill)

i wanted to use the workbook_open event to ask for the user and password
upon open. so far this works, but i didn't want to have the passwords shown
in the code, and wanted to 'hide' where they're coming from a little better.

is there a way to define a constant range (in another module), so that i can
use that range in the workbook_open event, without specifically stating where
it is coming from? (i was thinking to use the vlookup based on
environ("UserName") to check the password agains that entered by the user)

ie i don't want to use something like

with sheets("misc")
set x =.range("logins")
end with

in the workbook_open code

any suggestions or anyone have a better idea on how to go about this?

tia!

J

Bob Phillips[_7_]

a little more secure login
 
Why not hide the name logins

In the immediate window

Activeworkbook.Names("logins").Visible = False

Not foolproof, but it helps.


--
HTH

Bob Phillips

"Gixxer_J_97" wrote in message
...
hi all,

i have my logins / pass and other user information (pseudo permissions) on

a
sheet that will always be hidden to the user. (thought about an external

file
- but decided against it, also thought about authenticating with the

domain
server, but a little overkill)

i wanted to use the workbook_open event to ask for the user and password
upon open. so far this works, but i didn't want to have the passwords

shown
in the code, and wanted to 'hide' where they're coming from a little

better.

is there a way to define a constant range (in another module), so that i

can
use that range in the workbook_open event, without specifically stating

where
it is coming from? (i was thinking to use the vlookup based on
environ("UserName") to check the password agains that entered by the user)

ie i don't want to use something like

with sheets("misc")
set x =.range("logins")
end with

in the workbook_open code

any suggestions or anyone have a better idea on how to go about this?

tia!

J




Tom Ogilvy

a little more secure login
 
A named range knows what sheet it refers to.

Give the range name a gibberish name (with no reference to worksheet - no
with statements)

set v17xr7 = ThisWorkbook.Names("mm76832").RefersToRange


You could also pass the entered password through an encryption routine you
write before you attempt to match it to the stored value - so the stored
value isn't the value needed to be entered in the password prompt.

--
Regards,
Tom Ogilvy


"Gixxer_J_97" wrote in message
...
hi all,

i have my logins / pass and other user information (pseudo permissions) on

a
sheet that will always be hidden to the user. (thought about an external

file
- but decided against it, also thought about authenticating with the

domain
server, but a little overkill)

i wanted to use the workbook_open event to ask for the user and password
upon open. so far this works, but i didn't want to have the passwords

shown
in the code, and wanted to 'hide' where they're coming from a little

better.

is there a way to define a constant range (in another module), so that i

can
use that range in the workbook_open event, without specifically stating

where
it is coming from? (i was thinking to use the vlookup based on
environ("UserName") to check the password agains that entered by the user)

ie i don't want to use something like

with sheets("misc")
set x =.range("logins")
end with

in the workbook_open code

any suggestions or anyone have a better idea on how to go about this?

tia!

J





All times are GMT +1. The time now is 10:15 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com