VBA通过Shell调用Python时SciPy、sklearn模块DLL加载失败问题咨询

该问题确实和Shell调用机制直接相关，同时你的VBA代码存在命令拼接的小疏漏：

1. 手动运行Python脚本或Jupyter时，Anaconda会自动将自身关联的动态库路径（比如依赖DLL存放的Library/bin目录）加载到PATH环境变量中，但VBA调用WScript.Shell创建的进程继承的是Excel的运行环境，默认不会加载Anaconda的私有路径，导致scipy、sklearn依赖的qhull等底层DLL找不到，触发报错。
2. 原VBA代码中Python执行路径和脚本路径拼接时没有加空格，会导致系统无法正确识别命令参数，即使环境变量正常也可能运行失败。

• 首先在Python脚本最开头添加如下代码，分别手动运行脚本、VBA调用运行，对比两次输出的PATH值：

import os
print(os.environ["PATH"])

可以发现VBA调用场景下的PATH缺少Anaconda相关路径，通常缺失的是以下四个路径：
C:\Users\Peter_K\Anaconda3、C:\Users\Peter_K\Anaconda3\Scripts、C:\Users\Peter_K\Anaconda3\Library\bin、C:\Users\Peter_K\Anaconda3\Library\mingw-w64\bin

• 临时验证：在脚本导入依赖前，手动把上述路径加到PATH最前面，测试是否可以正常导入scipy和sklearn：

import os
os.environ["PATH"] = r"C:\Users\Peter_K\Anaconda3;C:\Users\Peter_K\Anaconda3\Scripts;C:\Users\Peter_K\Anaconda3\Library\bin;C:\Users\Peter_K\Anaconda3\Library\mingw-w64\bin;" + os.environ["PATH"]
# 后面接原有的导入代码

如果修改后运行正常，即可确认是环境变量缺失的问题。

方案1（推荐，不修改全局环境）：修改VBA调用逻辑，先激活Anaconda环境再运行脚本 #

通过调用Anaconda的activate脚本自动加载所有环境变量，同时修正命令拼接的空格问题：

Sub xls2py()
    Dim objShell As Object
    Dim ActivateCmd As String, PythonScript As String
    ChDir ActiveWorkbook.Path

    Set objShell = VBA.CreateObject("Wscript.Shell")
    ' 激活Anaconda基础环境
    ActivateCmd = """C:\Users\Peter_K\Anaconda3\Scripts\activate.bat"" C:\Users\Peter_K\Anaconda3 && "
    PythonScript = """C:\Users\Peter_K\Desktop\Untitled1.py"""
    ' 用cmd承载激活逻辑再运行Python脚本
    objShell.Run "cmd /c " & ActivateCmd & "python " & PythonScript
    Set objShell = Nothing
End Sub

方案2：修改系统全局环境变量 #

右键「此电脑」→「属性」→「高级系统设置」→「环境变量」，在系统变量的PATH中添加前面提到的四个Anaconda路径，保存后重启Excel即可生效，该方案不需要修改代码，但会修改全局环境配置。

内容的提问来源于stack exchange，提问作者Pete