Password protect workbook when opened. On failed attempt close, send email and delete workbook.

[camerong]

Hi guys,

Not sure where to start with this one, any help is greatly appreciated.

I am after a code that would run as soon as the workbook is opened. I would like it to first check the "Device name" and compare it to a list of names in the code which are allowed to open the workbook. If the "Device name" is on the list then it opens fine without any password prompt. If the "Device name" is not on the list then I would like it to prompt the user for a password (set in the code). If the user inputs the correct password, then the workbook opens fully. If the user inputs the incorrect password, then the Workbook shuts down, is deleted (would be great if it was permanently deleted, not just put in recycling bin) and an email is sent to a specific email address (stipulated in the code).

I am after this to try and protect company intellectual property.

 

[camerong]

Hi Sijpie,

I've changed the workbook code and device names, then tried reopening it. It reopens and doesn't prompt for a password, however it has all the other worksheets hidden except the one specified in the code. VBA seems accessible, its just the worksheets that aren't accessible / visible.