Propriedade VBAProject

Retorna um TXLSVBAProject analisado para uma pasta de trabalho XLS clássica que contém um storage VBA. O projeto expõe a contagem de módulos e o texto-fonte dos módulos por meio de itens TXLSVBAModule. Se a pasta de trabalho não tiver projeto VBA, a propriedade retorna nil. Use HasVBAProject / VBADefined para testar o conteúdo bruto, LoadVBAProjectFromFile e SaveVBAProjectToFile para mover o conteúdo de storage OLE preservado e ClearVBAProject para removê-lo da pasta de trabalho

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