Sparar arbetsbokens bevarade klassiska XLS VBA OLE-lagringsnyttolast till en compound file. Använd den när en applikation behöver arkivera, överföra eller återfästa den råa VBA-nyttolasten separat från arbetsboksfilen
Syntax
function SaveVBAProjectToFile(FileName: WideString): Integer;
Return value
Returnerar 1 när nyttolasten sparas; 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