请问如何正确在获得当前电脑中的登录的用户名信息？

lawnda · 发表于 2019-10-10 20:08

Sub test()

Debug.Print Shell("whoami")
Debug.Print Shell("net user")
Debug.Print Shell("hostname")
End Sub

各位大神，本人希望能通过类似上面的代码获取当前VBA运行的电脑的信息，如登录帐户，主机名称等。但上述命令得到是数字串，且每次运行结果不一。
应该如何处理才对？

多谢！

liulang0808 · 发表于 2019-10-11 08:10

Environ("Computername")
Environ("USERNAME")

lawnda · 发表于 2019-10-11 08:29

感谢版主！

硅谷少年 · 发表于 2020-5-12 10:14

用VBA自带的环境变量函数environ实现最简洁：
username = Environ("userdomain") & "\" & Environ("username")

		自动登录	找回密码
密码			免费注册

[求助] 请问如何正确在获得当前电脑中的登录的用户名信息？

最新热点 /1