nil
Usa HasVBAProject / VBADefined to test for the
raw payload, LoadVBAProjectFromFile e
SaveVBAProjectToFile to move the preserved OLE storage payload,
e ClearVBAProject to remove it from the workbook
Project := Workbook.VBAProject; if Project <> nil then ModuleText := Project[1].SourceCode;