epplus - 通过 EPPlus 获取工作簿的所有 VBA 宏

Question

在从EPPlusSample15.cs下载的示例中，我看到 EPPlus 可以编写/注入 VBA 宏。但是，我看不到如何从工作簿中读取所有 VBA 宏。.xlsm

EPPlus 可以解释VbaProject.bin和支持这个功能吗？

PS：似乎Open XML SDK也不能这样做（如果我错了请纠正我），这就是我考虑EPPlus的原因......

Answer 1

如果您只想阅读每个模块中的代码，您只需像这样浏览“Workbook.VbaProject.Modules”集合：

var fi = new FileInfo(@"C:\temp\Book1.xlsm");
using (var pck = new ExcelPackage(fi))
{
    var modules = pck.Workbook.VbaProject.Modules;
    foreach (var module in modules)
    {
        Console.WriteLine($"Module Name: {module.Name}{Environment.NewLine}Code:");
        Console.Write(module.Code);
        Console.WriteLine("---------");
    }

这将在输出中为您提供这个（我刚刚创建了一个带有两个模块的 excel xlsm）：

Module Name: ThisWorkbook
Code:
---------
Module Name: Sheet1
Code:
---------
Module Name: Module1
Code:
Public Sub proc1()
    Dim wb As Workbook
    Set wb = ActiveWorkbook

    Dim ws As Worksheet
    Set ws = wb.ActiveSheet

    ws.Cells(1, 1).Value = "proc1"

End Sub

---------
Module Name: Module2
Code:
Public Sub proc2()
    Dim wb As Workbook
    Set wb = ActiveWorkbook

    Dim ws As Worksheet
    Set ws = wb.ActiveSheet

    ws.Cells(2, 1).Value = "proc2"

End Sub

---------