Свойство VBAProject

Возвращает разобранный объект TXLSVBAProject для рабочей книги с VBA. Предоставляет доступ к модулям через TXLSVBAModule. При отсутствии VBA возвращает nil

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