Display username in message box that has a file open

I have bit of code that:
(1) opens another spreadsheet
(2) updates that spreadsheet
(3) saves that spreadsheet
(4) closes that spreadsheet

If the spreadsheet that requires updating is open by another user, I display a message indicating the file is open and no updates occured. There are about 20 persons within the organization that may have this file open? Is there away to display the username of the person who has the file open? Thanks in advance for any comments.

Do you mean something like this?

Please Login or Register  to view this content.

Hi Maacmaac,

According to this site: http://excel.tips.net/Pages/T002492_...File_Open.html

It's not possible to get this directly through VBA, but the article does offer an alternative. In the workbook create an AutoOpen macro (or Workbook Open event) so that the current user's info is stored in a hidden sheet.

If you go that route, don't use 'Application.Username' as that can contain anything from blank to an old user name. Use Environ("username") to get the username that is currently logged into Windows. Also, Environ("computername") will give you the PC name it is open on.

Hope that helps!

Glad you have it sorted out. If your users log into Windows via a domain or even group, I'd still recommend you go with

Please Login or Register  to view this content.

vs.

Please Login or Register  to view this content.

Application.Username simply pulls the value from: Office Button -> Excel Options -> Popular -> User Name. You could put Scooby Doo in there, or leave it blank, and that's what will be returned. By using Environ("username") you get the name of the user that is currently logged into the PC (windows/domain).