Excel: Exportar como PDF

Estructura

TCommonLibrary.ExcelExportAsPDF(AMachine:TatVirtualMachine); // (sExcelFileName, sPDFFileName, bIncludeDocProperties, bIgnorePrintArea, iPageFrom, iPageTo, bOpenAfterPublish)

Tipo

Procedimiento

Descripción

El procedimiento TCommonLibrary.ExcelExportAsPDF actúa como un enlace al método ExportAsFixedFormat de la automatización OLE de Excel (controladores de Windows). Esto significa que, para que el procedimiento funcione correctamente, es necesario que Excel esté instalado en el servidor.

Si el script puede abrir el documento mediante OLE (como [método Workbooks.Open (Excel) | Microsoft Learn](https://learn.microsoft.com/en-us/office/vba/api/excel.workbooks.open «https://learn.microsoft.com/en-us/office/vba/api/excel.workbooks.open»)), entonces pasa todas las variables a su función ExportAsFixedFormat, tal y como se describe aquí: Método Worksheet.ExportAsFixedFormat (Excel) | Microsoft Learn

El único parámetro que está fijado de forma permanente es el segundo parámetro «Quality», que está establecido en «Standard» (0).

Reunión sobre la creación de guiones entre bastidores:

     //Abrir libro de Excel
      try
        ExcelWorkbook := ExcelApplication.Workbooks.Open(sExcelFileName);
        //referencia
        //https://docs.microsoft.com/en-us/office/vba/api/excel.workbooks.open
      except
        ExcelWorkbook := Null;
        bResult := False;
      end;

      If VarIsNull(ExcelWorkbook) = False then
      begin
        Try
          ExcelWorkbook.ExportAsFixedFormat(0, sPDFFileName, 0, bIncludeDocProperties, bIgnorePrintArea, iPageFrom, iPageTo, bOpenAfterPublish, EmptyParam);
          // referencia
          //https://learn.microsoft.com/en-us/office/vba/api/excel.worksheet.exportasfixedformat
        Excepto
          bResult := False;
        Fin;
      fin;