Sub ZJLX ()
Dim code_str As String
Dim class_para %
Dim date_para As Date
Dim mlpath As String
Dim commdpath As String
Dim d (1 To 8, 1 To 1000)
Code_str=Range (" BM ")
Class_para=Range (" class ")
Mlpath=ThisWorkbook. Path
Mlopen
Commdpath="CD ('" & amp; Mlpath & amp; "')
"
Mlputvar ml_path, mlpath
Mlevalstring "commdpath
"Mlevalstring "CD (ml_path)
"Mlputvar "benchmark", code_str
Mlputvar sector_num, class_para
Mlevalstring "[a b c]=ZJLX (benchmark, sector_num);"
d MLGetVar "a",The Debug. Print d (1, 1)
End Sub
CodePudding user response:
Oh MLgetmatrix last one should be "a" "sheet1! A1. ""CodePudding user response:
Turn up!CodePudding user response:
Don't be A language code is modified to B language code busywork,Also don't use A language code to directly invoke B language code base, this complicated things so easy to get wrong,
Just make A, B language code of input and output is redirected to A text file, or modify A, B language code let it through text file input and output,
Can easily make A, B coordination between the two languages,