Sparar arbetsböckens bevarade klassiska XLS VBA OLE-lagringsnyttolast till en sammansatt fil. Använd detta när en applikation behöver arkivera, överföra eller bifoga råa VBA-nyttolasten separat från arbetsboken
Syntax
function SaveVBAProjectToFile(FileName: WideString): Integer;
Returvärde
Returnerar 1 när nyttolasten är sparad; returnerar ett negativt värde när arbetsboken saknar VBA-nyttolast eller filen inte kan skapas
Exempel
if Workbook.HasVBAProject then
Workbook.SaveVBAProjectToFile('C:\Reports\MacroPayload.ole');
Se även