Microsoft Office Forums - View Single Post - [Solved] Outlook VBA to open a windows folder

gmayor · 11-03-2015, 02:07 AM

OK, you need a simple function to open Windows Explorer e.g.

Code:

Sub OpenAtFolder(strPath As String)
    Shell "cmd /C start """" /max """ & strPath & """", vbHide
lbl_Exit:
    Exit Sub
End Sub

and you can call it from your code e.g.

Code:

    If MsgBox("Do you want to open the folder..?", vbYesNo) = vbYes Then
        OpenAtFolder "C:\OutlookAttachments\"
    End If