Machine Recognition

[jeffalex2]

Is there vba code for the workbook to recognize the user and what machine it's on when you open it? I've created a spreadsheet that has proprietary company info in it and I'd like to write a string that erases data if the workbook is opened on an unauthorized machine.

BTW...this is my 1st post but this site has been indispensable in the development of my project...

Thanks!!

 

[Gary McMaster]

You might be able to do something with "SaveSetting" & "GetSetting" (see VBA help) which allows you to read & write data to the registry. Because the data is in the registry it is specific to a certain machine and that data could indicate the user ID. On workbook open, No registry entry = problem or check ID if registry entry exists.

You could use a password protected macro to initialize the registry entry(s).

Hope that helps.

Gary

 

[Trebor76]

Hi jeffalex2,

Welcome to the MrExcel forum!!

The Environ (VBA only) function should do the job:

MsgBox Environ("UserName") 'Windows user name
    MsgBox Environ("ComputerName") 'Machine name

HTH

Robert

 

[njimack]

You can identify the user using Environ("Username") - for a full list of what you can info you can retrieve take a look at http://www.vbaexpress.com/kb/getarticle.php?kb_id=217