Jump to content

Macros/General/006/es

From The Document Foundation Wiki
This page is a translated version of the page Macros/General/006 and the translation is 100% complete.


Descripción

Un PDF híbrido es un archivo que se puede leer como cualquier otro PDF, pero que contiene el documento de origen en formato ODT, lo que le permite modificarlo con LibreOffice. Se puede crear con el comando de menú Archivo ▸ Exportar como PDF.

La siguiente macro muestra cómo hacer esto en LibreOffice Basic. La matriz propFich en este ejemplo especifica el filtro a usar (calc_pdf_Export) y las opciones seleccionadas. La matriz filterProps especifica el texto que se exportará y contiene un modificador IsAddStream para determinar si se realizará la exportación.

Código

en LibreOffice Basic:

Option Explicit

Sub ExportPDFinHybridFormat
    '''Exportar la hoja activa de Calc como un PDF híbrido'''

    Dim filterData(1) As New com.sun.star.beans.PropertyValue
    Dim filterProps(1) As New com.sun.star.beans.PropertyValue
    Dim fileAddress As String

    'Especificar los datos que se exportarán (filterData), para  incluirlos en el filtro
    filterData(0).Name = "Selection"
    filterData(0).Value = ThisComponent.CurrentController.ActiveSheet
    filterData(1).Name = "IsAddStream"
    filterData(1).Value = True

    'Especificar los valores del filtro que se empleará (filterPops) para exportar el documento con la  función storeToURL
    filterProps(0).Name = "FilterName"
    filterProps(0).Value = "calc_pdf_Export"
    filterProps(1).Name = "FilterData"
    filterProps(1).Value = filterData()

    fileAddress = convertToURL("/home/<user>/Documents/test.pdf")
    ThisComponent.storeToURL(fileAddress, filterProps())

End Sub ' ExportPDFinHybridFormat

Archivo ODS para probar la macro

Notas