Свойство Application.UserName (Project)

Получает или задает локальное имя текущего пользователя. Для чтения и записи, String.

Синтаксис

выражение. Имя пользователя

выражение: переменная, представляющая объект Application.

Примечания

Свойство UserName объекта Application показывает локальное имя пользователя. Для сравнения, свойство UserName объекта Profile показывает имя входа.

Свойство ИмяПользователя используется для настройки параметров проекта или макросов для конкретного пользователя. Например, предположим, что вы написали макрос PrintReport , который печатает Mine.mpp отчет при нажатии клавиш CTRL+R, но другой пользователь хочет использовать те же сочетания клавиш для печати Yours.mpp отчета. Макрос PrintReport можно изменить таким образом, чтобы он проверял свойство UserName и печатал Mine.mpp, если вы являетесь текущим пользователем, или печатал Yours.mpp если вы не являетесь текущим пользователем.

Примечание.

Свойство UserName является локальным именем, но может быть изменено на другое. Поле "Автор " в диалоговом окне "Свойства проекта " по умолчанию является именем пользователя для входа.

Пример

В следующем примере параметры задаются по имени текущего пользователя.

Sub GetUserName() 
 
    ' Get the user name. 
    UserName = InputBox$("What's your name?", , UserName) 
 
    ' If user is Jeff Smith, then set certain preferences. 
    If UserName = "Jeff Smith" Then 
        DisplayScheduleMessages = False 
        BarRounding On:=False 
        Calculation = True 
    ' Otherwise, set default preferences. 
    Else 
        DisplayScheduleMessages = True 
        BarRounding On:=True 
        Calculation = False 
    End If
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.