VBA调用matlab出现由于另一个程序正在运行,此操作无法完成,请切换或重试的问题
Dim Matlab As Object '全局变量声名
On Error Resume Next '对于matlab的打开、声明和错误处理
Set Matlab = GetObject("", "Matlab.Application")
If Err Then
Err.Clear
Set Matlab = CreateObject("Matlab.Application")
If Err Then
MsgBox "软件不能打开MATLAB,请重试!"
Exit Sub
End If
End If
'隐藏matlab窗口
Matlab.Visible = False
Call Matlab.PutFullMatrix("WDZ", "base", WDZ, IM)
Matlab.Execute ("load e:\data.mat;wip=WDZ(1,1:14);t0=WDZ(1,15);[X]=fun123(wip,t0,A);load e:\matlab2.mat;Attributes=X(1,:);[predict_label1]=svmpredict(1, Attributes,svmModel);z=predict_label1;")
Call Matlab.GetFullMatrix("z", "base", z, IM)
For j = 1 To 1
Yc1 = z(1, j)
Next
Call Matlab.Quit
Set Matlab = Nothing
应该是由于MATLAB计算较慢,上次调用还没计算完毕,你又去调用。
不知道上述这段话,您是否能正常理解?
请问你是在金字塔平台上运行的吗?
不是金字塔平台,我们没法帮您的