Project) (Application.UserName 屬性

會取得或設定目前使用者的本機名稱。 可讀寫的 String。

語法

運算式。使用者

expression 代表 Application 物件的變數。

註解

Application 物件的 使用者名稱 屬性顯示本機使用者名稱。 相較之下， UserName 屬性的 設定檔 物件顯示的登入名稱。

使用 UserName 屬性來自訂 Project 選項或特定使用者的巨集。 例如，假設您具有寫入名為 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 支援與意見反應。