Matlab可以通过ActiveX在Excel文件中编写宏吗？

2019年7月28日 303次阅读

有几篇帖子和说明如何通过ActiveX使用Matlab运行Excel宏.但是有可能用Matlab将这样的宏写入Excel文件吗？

背景：我写了一个Matlab工具,可以将数据导出到Excel文件中.这些Excel文件应包含特定的宏,该宏取决于包含的数据.

好吧有一个丑陋的解决方法：我可以使用已包含的特定宏创建Excel模板.然后复制相应的模板并用导出数据填充.但也许这个问题有一个更好,更灵活的解决方案……

最佳答案 一旦您允许以编程方式访问VBA项目,我建议您将宏写入文本文件(* .txt或* .bas),然后运行导入此文本文件的命令具有VBA代码模块.例如：

DataFileName = 'D:\Test\DataFile.xlsm';
CodeFileName = 'D:\Test\CodeFile.txt';

Excel = actxserver('Excel.Application');
Workbooks = Excel.Workbooks;
Workbook=Workbooks.Open(DataFileName);

% Make Excel visible (Optional)
Excel.visible = 1;

%% Import the code
Import(Workbook.VBProject.VBComponents,CodeFileName);

%% Save
Excel.Application.DisplayAlerts = 0; %Avoid overwrite warning
SaveAs(Workbook,DataFileName);
Excel.Application.DisplayAlerts = 1;

%% Close Excel
Quit(Excel);
delete(Excel);

在这种情况下,CodeFile.txt可能如下所示：

Attribute VB_Name = "ModuleName"
Option Explicit

Sub SomeMacro()

    Msgbox "From MATLAB, with love..."

End Sub

这里,行属性VB_Name = …是必不可少的,将确定模块的名称.对于Option Explicit,它不是强制性的,但它是good practice.

点赞