从VBA运行并执行一个python脚本 [英] Run and execute a python script from VBA

问题描述

我试图从VBA模块中运行一个python脚本。我已经尝试了在互联网上看到的每个例子，所以没有运气。
在VBA模块中，我还运行一个.bat文件，它的工作原理很好：

  batchname =U： \Backup Bat File.bat
 
 Shell批次名称，vbNormalFocus 
  

下一页我需要运行python脚本，它位于与excel文件相同的文件夹中。
现在我正在尝试这个：

  Dim Ret_Val 
 
 Dim args 
 
 args = Activeworkbook.Path& \beps_output.py
 
 Ret_Val = Shell（C：\python34\python.exe& args，vbNormalFocus）
  pre> 
 
 
它不会出错，但没有任何反应。我有点困惑，Ret_Val（返回值？）在这里，为什么它不运行。
解决方案
 
  Ret_Val = Shell（C：\python34\python .exe& args，vbNormalFocus）
  
另外，因为 Shell 是一个返回值（变量类型 - 双）的函数，使用指定的参数，返回的值可以包含在一个变量中，如您使用Ret_Val指定的那样。然后，您可以使用此值添加条件逻辑和错误处理。
 
I'm trying to run a python script from my VBA module. I've tried pretty much every example I've seen on the internet and so for have had no luck. 
In the VBA module I also run a .bat file, and it works perfectly:
batchname = "U:\Backup Bat File.bat"

Shell batchname, vbNormalFocus
Next I need to run the python script, which is located in the same folder as the excel file.
Right now I'm trying out this:
Dim Ret_Val

Dim args

args=Activeworkbook.Path & "\beps_output.py"

Ret_Val = Shell("C:\python34\python.exe" & args, vbNormalFocus)
It doesn't error out, but nothing happens. I'm a little confused at what the "Ret_Val" (return value?) does here, and why it isn't running.
解决方案
Try adding a space between exe program and file:
Ret_Val = Shell("C:\python34\python.exe " & args, vbNormalFocus)
Also, because Shell is a function that returns a value (variant type - double) with specified arguments, the returned value can be contained in a variable, here as you specify with Ret_Val. You can then add conditional logic and error handling using this value.

                        
这篇关于从VBA运行并执行一个python脚本的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！