В этом коротком руководстве будет показано, как использовать метод Application.UserName.
Получение и изменение имени пользователя приложения в VBA
Получить имя пользователя
Вы можете использовать Application.UserName для возврата или установки имени текущего пользователя. Это имя по умолчанию, которое отображается в «макросах, записанных кем», новых комментариях, «последним сохраненным пользователем» и т. Д.
Вы можете отобразить имя текущего пользователя в окне сообщения, например:
MsgBox "Текущий пользователь" & Application.UserName
Изменение имени пользователя
Вы можете изменить текущее имя пользователя следующим образом:
Application.UserName = "MonkeyCoder"
Если вам интересно, кто является автором текущей книги, вы можете получить ее так:
UserNameAuthor = ThisWorkbook.BuiltinDocumentProperties («Автор»)
Вы также можете изменить его:
ThisWorkbook.BuiltinDocumentProperties ("Автор") = "ItsMe"
Имя пользователя Windows можно получить так:
UserNameWindows = Environ ("Имя пользователя")
<