Как открыть папку Windows без использования имени пользователя через VBA?

Question

Я пытаюсь открыть папку Windows (папка «Загрузки») с помощью командной кнопки в пользовательской форме в Excel. Однако я хочу использовать общий путь к папке для доступа к папке загрузок, чтобы любой, у кого есть этот файл Excel, мог открыть свою папку загрузок. Я получил этот код из Интернета, но он не работает, он только открывает папку с документами, которая, по моему мнению, является папкой по умолчанию.

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

Как мне этого добиться?

Answer 1

Вы хотите использовать функцию Environ():

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

Функция Environ