VBAProject 属性

为包含 VBA 存储的经典 XLS 工作簿返回一个已解析的 TXLSVBAProject 该项目通过 TXLSVBAModule 项公开模块计数和模块源代码文本 如果工作簿没有 VBA 项目，该属性返回 nil。 使用 HasVBAProject / VBADefined 测试原始载荷， 使用 LoadVBAProjectFromFile 和 SaveVBAProjectToFile 移动保留的 OLE 存储载荷， 使用 ClearVBAProject 将其从工作簿中移除

Project := Workbook.VBAProject;
if Project <> nil then
  ModuleText := Project[1].SourceCode;