Application.UserName プロパティ (Project)

Gets or sets the local name of the current user. 読み取り/書き込みが可能な String です。

構文

式。名

expressionApplication オブジェクトを 表す変数。

注釈

Application オブジェクトの UserName プロパティは、ローカル ユーザーの名前を示します。 これに対して、Profile オブジェクトの UserName プロパティにはログオン名が表示されます。

プロジェクトのオプション] または [特定のユーザー用のマクロをカスタマイズするのにには、 UserName プロパティを使用します。 たとえば、CTRL + R を押したときに既に割り当てているレポートを印刷する PrintReportをという名前のマクロを記述したが、他のユーザーが Yours.mpp のレポートを印刷するのには同じショートカット キーを使用したいとします。 PrintReportマクロを編集するには、 UserName プロパティをチェックして、現在のユーザーの場合は、編集を印刷または現在のユーザーでない場合は、識別を印刷できるようにします。

注:

[!メモ] 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 のサポートおよびフィードバックを参照してください。