在打开的单元格中显示Excel帐户用户名

使用Office 2013时 ，我尝试插入VBA代码，以便在打开Excel电子表格时，自动将任何Office产品右上angular显示的员工姓名input到单元格B2 。 我正在使用的当前代码是

 Sub Auto_Open() Range("B2").Value = " " & Application.UserName End Sub 

但是，这只是显示“授权用户”。
我究竟做错了什么？