Właściwość VBAProject

Zwraca sparsowany obiekt TXLSVBAProject dla klasycznego skoroszytu XLS zawierającego pamięć masową VBA. Projekt udostępnia liczbę modułów i ich nazwy do celów inspekcji TXLSVBAModule elementy Jeśli skoroszyt nie ma projektu VBA, właściwość zwraca nil Use HasVBAProject / VBADefined to test for the raw payload, LoadVBAProjectFromFile and SaveVBAProjectToFile aby przenieść zachowany ładunek pamięci masowej OLE, a ClearVBAProject to remove it from the workbook

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