Возвращает true, если рабочая книга содержит VBA-код
Синтаксис
function VBADefined:boolean;
Примечания
Используйте VBADefined перед перезаписью. Метод является только проверкой и не создаёт, не удаляет и не редактирует VBA-модули
Результат True означает наличие потока VBA. Сохраняйте в формате, поддерживающем VBA, и не экспортируйте в текст, HTML или RTF
Пример
Открывает рабочую книгу и проверяет наличие VBA-кода перед сохранением
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;
См. также