如何在不通过 vba 使用用户名的情况下打开 windows 文件夹？答案

【问题标题】：How to open windows folder without using username via vba?如何在不通过 vba 使用用户名的情况下打开 windows 文件夹？
【发布时间】：2019-12-01 07:46:39
【问题描述】：

我正在尝试通过 Excel 用户窗体中的命令按钮打开 Windows 文件夹（下载文件夹）。但是，我想使用通用文件夹路径来访问下载文件夹，以便拥有此 excel 文件的任何人都可以打开他们的下载文件夹。我从互联网上得到了这段代码，但它不起作用，它只打开我认为是默认文件夹的文件夹。

Private Sub CommandButton1_Click()
   Shell "explorer.exe" & " " & "C:\Users\%USERNAME%\Downloads", vbNormalFocus
End Sub

我怎样才能做到这一点？

【问题讨论】：

【解决方案1】：

你想使用Environ()函数：

"C:\Users\" & Environ("Username") & "\Downloads"

【讨论】：

谢谢你！！！它奏效了，你让我开心。周末愉快。
这是我用来使它工作的代码。 Private Sub CommandButton1_Click() Shell "explorer.exe" & " " & "C:\Users\" & Environ("Username") & "\Downloads", vbNormalFocus End Sub