vba - Excel VBA 打开文件夹

Question

使用 2010 Excel VBA - 我只是想通过子文件夹打开一个文件夹。我在这里做错了什么？

VBA

Sub openFolder()  
  Dim preFolder As String, theFolder As String, fullPath as String

    theFolder = Left(Range("T12").Value, 8)
    preFolder = Left(Range("T12").Value, 5) & "xxx"
    fullPath = "P:\Engineering\031 Electronic Job Folders\" & preFolder & "\" & theFolder

    Shell(theFolder, "P:\Engineering\031 Electronic Job Folders\" & preFolder, vbNormalFocus)

End Sub

Answer 1

如果你想打开Windows文件资源管理器，你应该调用explorer.exe

Call Shell("explorer.exe" & " " & "P:\Engineering", vbNormalFocus)

等效语法

Shell "explorer.exe" & " " & "P:\Engineering", vbNormalFocus