Цей короткий підручник покаже, як використовувати метод Application.UserName.
Отримайте та змініть ім’я користувача програми у VBA
Отримайте ім'я користувача
Ви можете використовувати Application.UserName для повернення або встановлення імені поточного користувача. Це назва за замовчуванням, яка відображається у "макросі, записаному", новими коментарями, "востаннє збережено" тощо …
Ви можете відобразити ім’я поточного користувача у вікні повідомлення таким чином:
MsgBox "Поточний користувач" & Application.UserName
Змінити ім’я користувача
Ви можете змінити поточне ім’я користувача таким чином:
Application.UserName = "MonkeyCoder"
Якщо вам цікаво, хто є автором поточної робочої книги, ви можете отримати її так:
UserNameAuthor = ThisWorkbook.BuiltinDocumentProperties ("Автор")
Ви також можете змінити його:
ThisWorkbook.BuiltinDocumentProperties ("Автор") = "ItsMe"
Ім'я користувача Windows можна отримати так:
UserNameWindows = Середовище ("Ім'я користувача")
<