使用Shell函数运行exe时发现文件未找到错误

我正在运行一个userform,它应该运行一个exe文件,在工作文件夹中找到,如下所示:

Sub RunProcessor()
    If MsgBox("Run simulation?", vbYesNo) = vbNo Then
      Exit Sub
    Else
      ChDir ThisWorkbook.Path
      Shell ("runsims.exe")
    End If
End Sub

这在我的本地驱动器上工作正常,但是当我将所有内容移动到服务器驱动器时(Shell函数调用行上的运行时错误5),它开始失败.

我知道在cmd中,当你在C:盘上工作并cd L:\...\...\打电话时,你也需要输入L:,所以我试着将这行代码插入到另一个Shell调用之上:Shell (Left(ThisWorkbook.Path, 2))但是这也失败了.我怎么能运行"runsims.exe",因为它总是在当前的工作驱动器中？

ChDir只能在同一个驱动器上将当前目录更改为另一个目录 - ChDrive如果要切换到其他驱动器上的文件夹,则需要先使用.

更好的是,将完整路径传递给Shell并跳过更改当前目录.

Sub RunProcessor()
    If MsgBox("Run simulation?", vbYesNo) = vbYes Then
        Shell (ThisWorkbook.Path & "\runsims.exe")
    End If
End Sub