Läser in en klassisk XLS VBA OLE-lagringsnyttolast från en compound file. Källfilen måste innehålla antingen _VBA_PROJECT_CUR or
_VBA_PROJECT som lagring på toppnivå. Metoden ersätter alla VBA-nyttolaster som redan sitter på arbetsboken
Syntax
function LoadVBAProjectFromFile(FileName: WideString): Integer;
Return value
Returnerar 1 när nyttolasten läses in; returnerar ett negativt värde om filen inte kan öppnas eller inte innehåller någon VBA-lagring som stöds
Exempel
if Workbook.LoadVBAProjectFromFile('C:\Reports\MacroPayload.ole') = 1 then
Workbook.SaveAs('C:\Reports\MacroWorkbook.xls', xlExcel97);
Se även