Open Downloads Folder

[kevinh2320]

I'm looking for VBA code that will open Windows File Explorer at the Downloads folder. I have the code below that will open the Documents folder and I've been able to modify it to open other locations but, can't figure out how to open the Downloads folder.

Private Sub Command1_Click()

Dim Foldername As String
Foldername = "\\server\Instructions\"

Shell "C:\WINDOWS\explorer.exe """ & "Documents" & "", vbNormalFocus

End Sub

Thanks for any help.

 

[xenou]

Shell "C:\WINDOWS\explorer.exe %userprofile%\Downloads", vbNormalFocus

This isn't working for me either (while the same command at the run prompt does work: C:\WINDOWS\explorer.exe %userprofile%\Downloads)

I suggest you use the other method shown above. Or a temp folder instead of the downloads folder if that would fit. Or possibly the public downloads folder (not sure what your end goal is so these are just some other possibilities)

 

[kevinh2320]

The code from Micron with vbNormalFocus added worked! Thank you all very much!

 

[Micron]

You're welcome. I learned something in the process. Like many other things I manage to help with, it's probably not something I'll remember if I ever need it!