Returnerer true if Workbook contains VBA code
Syntaks
function VBADefined:boolean;
Beskrivelse
Use VBADefined inden en eksisterende projektmappe overskrives, når programmet skal bevare filer med makroer. Metoden er en skrivebeskyttet kontrol; den opretter, fjerner eller redigerer ikke VBA-moduler
I den klassiske XLS-facade betyder et True-resultat, at projektmappen har en VBA-projektstream. Gem filen i et Excel-format, der kan bevare VBA-indhold, og undgå at eksportere den til tekst, HTML eller RTF, hvis makrobevaring er påkrævet
Eksempel
Eksemplet åbner en eksisterende projektmappe og kontrollerer, om den indeholder VBA-kode, inden den gemmes
var
Workbook: IXLSWorkbook;
begin
Workbook := TXLSWorkbook.Create;
try
Workbook.Open('C:\Reports\Template.xls');
if Workbook.VBADefined then
ShowMessage('This workbook contains VBA code.');
Workbook.SaveAs('C:\Reports\TemplateCopy.xls');
finally
Workbook := nil;
end;
end;
Se også