Execute

Du kan benytte ShellExecute(..); det er den eneste jeg lige kender til...

The ExploreFolder method, shown below, calls the ShellExecute function with the two arguments you have specified (the folder and window names). The explorer window is then displayed to the user.

Public Sub ExploreFolder(FormName As Long, FolderName As String)
    On Error Resume Next
    Dim X As Long
    X = ShellExecute(FormName, \"Explore\", FolderName, 0&, 0&, SW_SHOWMAXIMIZED)
End Sub