VBA中执行调用matlab程序（二）

隐蔽式水箱VBA中执⾏调⽤matlab程序（⼆）上⼀篇的疑问，得到解决，可以这样改写：

Sub ts2()

fileToRun = "D:\OneDrive\matlab\matlab⼀键启动\" & "xy.m"

matlabpath = "D:\Program Files\MATLAB\R2018a\bin\matlab -nodisplay -nosplash -nodesktop -r "

matlabCommand = matlabpath & " run('" & fileToRun & "');exit;"""

Shell (matlabCommand)

End Sub

光学增强器守卫

-nodisplay -nosplash -nodesktop 的意思是只打开命令窗⼝，不以通常的⽅式打开matlab。

省略的话，打开的界⾯和以matlab快捷⽅式打开完全⼀样。

Sub ts3()

fileToRun = "D:\OneDrive\matlab\matlab⼀键启动\" & "xy.m"

matlabpath = "D:\Program Files\MATLAB\R2018a\bin\matlab"

matlabCommand = matlabpath & " -r "" run('" & fileToRun & "');"""

Shell (matlabCommand)

End Sub

"D:\OneDrive\matlab\matlab⼀键启动\" 这⼀段可以被 ThisWorkbook.Path & "\"代替。

"xy.m" 可以⽤VBA中的Dir函数获取。

" -r " 中的-r前后必须带有空格。

"D:\Program Files\MATLAB\R2018a\bin\matlab" 启动路径可以⽤" /c matlab”代替

破窗器Sub ts()工业盐水

MyPath = ThisWorkbook.Path & "\"

File = Dir(MyPath & "*.m*")

Shell " /c matlab -r "" run('" & MyPath & File & "');"""h5n9

人型JY采集器End Sub

本文发布于:2024-09-21 15:44:32，感谢您对本站的认可！

标签：解决打开守卫获取空格路径

留言与评论（共有 0 条评论）