Access Control Text List

Hello, I have a workbook which executes a task to copy some files to a users machine. I would like to allow users access to run the script by checking if their username 'Environ("USERNAME")' is listed in a text file on a server. If they are not, then the script doesn't run and pops up a message before forcing the workbook to close.

Can anyone help me with the code to perform this task?

Thanks,
Tom

Hi roy,

I don't want to share a password, I have a list of usernames who require access so I would prefer to have these IDs in a text file that the workbook can lookup - if a user is not on the list, the code doesn't run the copy file routine.