セルに現在のユーザー名を表示するにはどうすればよいですか？

Question

私は通常、VBAでこの情報を取得する方法を私に見せることができるオンラインリソースのほとんどで。この情報をセルで直接得る方法はありますか？細胞からそれを呼び出すそして

Function UserNameWindows() As String 
    UserName = Environ("USERNAME") 
End Function 

：

Answer 1

以下のリンクの手順に基づいて、次の操作を行います。 VBAで

は、新しいモジュールを挿入し、このコードを貼り付け：

Public Function UserName() 
    UserName = Environ$("UserName") 
End Function 

は、式を使用して関数を呼び出す：

=Username() 

で指示に基づいて：

https://support.office.com/en-us/article/Create-Custom-Functions-in-Excel-2007-2f06c10b-3622-40d6-a1b2-b6748ae8231f

Answer 2

最も簡単な方法は、これと同様に、その機能をラップするVBAマクロを作成することである（動作しませんでした）=ENVIRON('User')ように単純例えば

：

=UserNameWindows() 

詳細およびその他の方法については、this articleを参照してください。

Answer 3

例：セルC5のWindowsユーザー名を表示するには、thスクリプトです：

Range("C5").Value = ": " & Environ("USERNAME"). 

Answer 4

あなたはVBAにUDFを作成したくない場合、またはあなたができない場合は、これは選択肢である可能性があります。

=Cell("Filename",A1)これはあなたに完全なファイル名を与えます、そしてここから、あなたがこのような何かを持つユーザ名を取得することができます：

=Mid(A1,Find("\",A1,4)+1;Find("\";A1;Find("\";A1;4))-2)

---

この式は、以前に保存したブックからのみ実行されます。

ドライブの最初のスラッシュのため、4番目の位置から開始する必要があります。

Answer 5

これは、現在のユーザーの名前が表示されます。

Function Username() As String 
    Username = Application.Username 
End Function 

プロパティApplication.Usernameは、MS Officeのインストールで入力した名前を保持します。

は、セルに次の式を入力します。

=Username()