vba打开指定路径文件夹

在VBA (Visual Basic for Applications) 中，你可以使用 `CreateObject` 函数结合 `Shell` 函数来打开指定路径的文件夹。下面是一个简单的例子：

Sub OpenFolder()
    Dim objShell As Object
    Set objShell = CreateObject("WScript.Shell")
    
    ' 替换 "C:\YourFolderPath\" 为你想要打开的实际路径
    Dim folderPath As String
    folderPath = "C:\YourFolderPath\"
    
    ' 使用 Shell 函数打开文件夹
    objShell.Run folderPath, vbNormalFocus   ' vbNormalFocus 表示正常窗口模式打开
    
End Sub

在这个代码中，你需要将 `"C:\YourFolderPath\"` 替换成你想要打开的具体文件夹路径。运行这段VBA代码会启动默认的文件浏览器，让你可以选择或直接打开指定的文件夹。