从 VBA 运行 python 脚本

下面的代码在一台机器上从 Windows excel VBA Shell 执行简单的 python 脚本，但不在另一台机器上执行。

 Sub RunIt()
    CreateObject("wscript.shell").Run "python.exe " & """\\acntnyc039\dept\HGS\Bob\test_syst_arg2.py""", 1, True
    'same as
    Shell "python.exe ""\\acntnyc039\dept\HGS\Bob\test_syst_arg2.py""", 1
End Sub

对应的Python：

import pandas as pd
import sys
path = r'\\acntnyc039\dept\HGS\Bob\test\test.csv'

raw_data = {'first_name': ['Jason', 'Molly', 'Tina', 'Jake', 'Amy'], 
        'last_name': ['Miller', 'Jacobson', 'Ali', 'Milner', 'Cooze'], 
        'age': [42, 52, 36, 24, 73], 
        'preTestScore': [4, 24, 31, 2, 3],
        'postTestScore': [25, 94, 57, 62, 70]}
df = pd.DataFrame(raw_data, columns = ['first_name', 'last_name', 'age',
                                       'preTestScore', 'postTestScore'])
df.to_csv(path)

我已阅读所有类似的主题并检查了以下内容：

1. 两个用户都具有相同的非管理员访问权限，但其中一个用户不会执行该操作，不会产生任何错误消息（但 cmd 打开）
2. 网络路径没有空格
3. 同一行直接从 cmd 运行得很好
4. 输入时发现pythonpython from cmd，但仍然尝试将 python 替换为python.exe以及完整路径python.exe在上面的VBA字符串中无济于事
5. 完全重新安装 anaconda3 并没有解决问题
6. shell 似乎在非 python 代码上运行良好，如下所示：

Shell "notepad.exe ""\\acntnyc039\dept\HGS\Bob\test\test.csv""", 1

我真的没有想法了......

这是 VBA 中的代码：

Dim wshShell As Object
Dim py_exe As String
Dim script_path As String, script_name As String
Dim waitOnReturn As Boolean: waitOnReturn = True
Dim windowStyle As Integer: windowStyle = 1

py_exe = "python.exe"
script_name = "write.py"
script_path = Application.ThisWorkbook.Path & "\" & script_name

Set wshShell = CreateObject("WScript.Shell")
wshShell.Run py_exe & " " & script_path, windowStyle, waitOnReturn

可能需要三引号"""if spaces in the path"""

这里是最有用的部分（通过执行bat检查错误的VBA代码）：

Dim errorCode As Long  'to check via bat
errorCode = wshShell.Run("cmd.exe /C C:\code\yourpath\BaT.bat", windowStyle, waitOnReturn)

这里是.bat itself:

:: this is to keep cmd open after run, /k
start cmd.exe /k ""python" "C:\code\yourpath\write.py""

最后这是一个示例 python 脚本write.py上面用过。请注意指定完整路径因为它可能运行良好cmd或 IDE 但不是来自wscript.Shell

from pathlib import Path
import sys
# directory of main and all supplementary files such as err.txt and .png
file_dir = Path(__file__).parent.absolute()

sys.stderr = open(file_dir / 'err.txt', 'w')
sys.stdout = open(file_dir / 'out.txt', 'w')

with open(file_dir / 'readme.txt', 'w') as f:
    f.write('Hello Peter!')