Pulling Data from a list based on Username

[jo15765]

I have several different workbooks that I need to append a unique identifier (based off who opened it) to the end of the file name and save in a location on my local pc. I have the unique identifiers set, i have the save statement set, but I don't know in VBA how to set the references. Meaning let's say that if me (jo15765) opened workbook200 then I would need to search and find jo15765 = 45678, so the workbook would be saved in a location on my local PC with the filename of workbook200_45678. How can I reference a list of what usernames equal what identifiers? I know I could write multiple IF/Else statements or use Case statements. Are those the only options I have?

[Leith Ross]

Hello jo15765,

Are you saying that jo15765 is replaced by the number 45678 and you want a way to enter 45678 and return jo15765?

[jo15765]

I was meaning that if the username that opened the workbook was JO15765 then I want to append the id 45678 to the end of the workbook name. There have been ID's assigned to all usernames, and it's a way of monitoring who is opening what workbook. So in the instance that someone finds the log file, they won't know whose ID is whose, but if we appended usernames then that would be very easily recognizable.

[Leith Ross]

Hello jo15765,

You can return the logged on User's ID this way...

Please Login or Register  to view this content.

[jo15765]

What about I try this approach....I created an access table with 3 fields, an autonumber, Name Field, and UniqueID field. How in VBA can I say, when the workbook is opened, take the userid that opened it, search the table (I am assuming I would have to build a query) and find the UniqueID and save the workbook with the UniqueID appended to the filename locally?