1 回答

TA贡献1765条经验 获得超5个赞
弄清楚了。我在其他人需要放置其特定信息的地方放置了方括号:
Sub execute_notebook()
Dim objShell As Object
Dim new_cmd_window As String
Dim full_script As String
Dim activate_env As String
Dim change_dir_script As String
Dim convert_and_run_nb As String
Set objShell = VBA.CreateObject("Wscript.Shell")
new_cmd_window = "cmd /c"
activate_env = "cd /d [path to Anaconda\Scripts folder which on my machine is C:\ProgramData\Anaconda3\Scripts] & activate [environment_name] &"
change_dir_notebook = "cd /d [path to folder where notebook is] &"
convert_and_run_nb = "jupyter nbconvert --to notebook --execute [notebook name].ipynb"
full_script = new_cmd_window & " " & Chr(34) & activate_env & " " & change_dir_script & " " & convert_and_run_nb & Chr(34)
objShell.run full_script
End Sub
关于我的发现的几点说明:
没有工作
new_cmd_window
出于某种原因,简单地使用
activate [environment name]
VBA 是行不通的。当我将它输入 cmd 行时很好。最后我不得不手动更改目录并以这种方式运行它。
添加回答
举报