Erhalten Sie alle VBA-Makros einer Arbeitsmappe von EPPlus

Question

Im Beispiel Sample15.cs heruntergeladen von EPPlus, sehe ich, dass EPPlus VBA-Makros schreiben/injizieren kann. Ich sehe jedoch nicht, wie alle VBA-Makros aus einer .xlsm-Arbeitsmappe gelesen werden.

Kann EPPlus VbaProject.bin interpretieren und diese Funktionalität unterstützen?

PS: es scheint, dass Open XML SDK dies nicht tun können, entweder (bitte korrigieren Sie mich, wenn ich falsch bin), das ist, warum ich EPPlus bin am überlegen ...

Answer 1

Wenn Sie nur den Code in jeder Module, die Sie gerade lesen möchten gehen, um durch die Sammlung ‚Workbook.VbaProject.Modules‘ wie folgt aus:

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("---------"); 
    } 

Welche Sie dies in der Ausgabe geben (ich habe gerade eine Excel-xlsm mit zwei Modulen):

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 

---------