excel vba执行R脚本

Question

我在excel中构建了一个UI来执行R脚本。我正在使用下面的代码。但是，我在最后一行收到错误。错误信息是：

  

方法＆＃39>运行＆＃39;对象＆＃39; IWshShell3＆＃39;失败。

你能帮忙吗？

Sub RunRscript()

    Dim shell As Object
    Set shell = VBA.CreateObject("WScript.Shell")
    Dim waitTillComplete As Boolean: waitTillComplete = True
    Dim style As Integer: style = 1
    Dim errorCode As Integer
    Dim path As String
    path = "Rscript C:\Desktop\excel2csv.R"
    errorCode = shell.Run(path, style, waitTillComplete)
End Sub