Свойство VBAProject

Возвращает разобранный объект TXLSVBAProject для рабочей книги с VBA. Предоставляет доступ к модулям через TXLSVBAModule . При отсутствии VBA возвращает nil Use HasVBAProject / VBADefined to test for the raw payload, LoadVBAProjectFromFile and SaveVBAProjectToFile чтобы перенести сохранённые данные хранилища OLE, и ClearVBAProject to remove it from the workbook

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