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

Can Matlab write a macro in an Excel file via ActiveX?

有几篇文章和说明如何通过 ActiveX 使用 Matlab 运行 Excel 宏。但是可以用 Matlab 将这样的宏写入 Excel 文件吗?

背景:我编写了一个将数据导出到 Excel 文件的 Matlab 工具。这些 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

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