使用VBA运行Python脚本

Question

我正在尝试通过VBA和shell函数运行python脚本。下面是我的VBA代码

Private Sub Script()

Dim wsh As Object
Set wsh = VBA.CreateObject("WScript.Shell")
Dim waitOnReturn As Boolean: waitOnReturn = True
Dim windowStyle As Integer: windowStyle = 1


MyFile = "C:\Desktop\cmdcode.bat"
fnum = FreeFile()
Open MyFile For Output As #fnum
Print #fnum, "cd C:\Desktop\"
Print #fnum, "python CreatePPT.py"
Close #fnum


' Run bat-file:
wsh.Run MyFile, windowStyle, waitOnReturn


' optional, remove bat-file:
Kill "C:\Desktop\cmdcode.bat"

End Sub

我认为我能够调用cmd，但无法运行我的python脚本。

下面是使用shell函数调用的cmd窗口（我是Stackoverflow的新手，它不允许我在获得一定声誉之前嵌入图像。我深表歉意）

cmd window 1

下面是从我的开始菜单中调用的cmd窗口

cmd window 2

这两个cmd窗口之间似乎有区别，第一个窗口无法执行我的python脚本，而第二个窗口运行良好。

任何见解可能是什么原因？谢谢！